A rather simpler demonstration is:
eval $ARGV[ 0 ]; [download]
In reply to Re^2: Perl Cannot Be Parsed: A Formal Proof (meh) by BrowserUk in thread Perl Cannot Be Parsed: A Formal Proof by Jeffrey Kegler