#!/usr/local/bin/perl
END {print "After\n"}
print "Before\n";
compile error now;
print "This\n";
BEGIN {print "Row above compiled\n"};
__END__