print $Job->{'Sub'}; ergibt CODE(0x1234567)
Vielleicht $Job->{'Sub'} hier bereits die "stringification" der Referenz? Was gibt denn
aus (es muesste CODE sein)?
Wenn nicht, dann ist das vielleicht ein Fall fuer B::Deparse...\n\n
<!--EDIT|ptk|1093284675-->