in reply to Perlish Debugging Style

I would be wary of thinking it's so easy to filter out such lines, consider
my $foo =~ m{ # match things between ;;s ; (.+) ; }x;