##
perl -c -e 'use parent "Catalyst::Controller"; sub taco :Chained("/") :PathPart("foo") : CaptureArgs(0) {}'
-e syntax OK
##
##
# emacs/vi UseMe.pm
package UseMe;
print STDERR "rm -rf /";
perl -c UseMe.pm
UseMe.pm syntax OK
perl -c -e 'use UseMe'
rm -rf /-e syntax OK