They say that the only thing that can parse Perl is the Perl parser itself. Why? Well, you can use # inside quoted strings and regular expressions, but you can also redefine the wrappers around these things with q(), qq(), m(), s()(), tr()() and so on. My suggestion is to try the deparser: