Select Code to Download

my $tmp = substr($_,0,200);
$tmp =~ s/\s+\w*$//g;

$ perl -e 'do() || ! do() ;'
Undefined subroutine &main::try