in reply to Trying to understand Perl :-)

*cough* B::Deparse as per Basic debugging checklist