You might check some of the B::* and O::* modules which come in the standard distribution, but as the saying goes, "nothing can parse Perl except perl." The tokenizer is black magic, the complexity in some subtle cases is amazing.

--
[ e d @ h a l l e y . c c ]