Select Code to Download

perl -MO=Deparse -M"Data::Dump; print 'Hi'" -ne ""
use Data::Dump;
print 'Hi';
...
    ();
}
-e syntax OK

perl -M"5.01;say q&" -Mstrict -anE " print 'Hi'; }&;{"
;use strict;use feature ':5.26';LINE: while (<>) {our @F=split(' ');
 print 'Hi'; }