Select Code to Download

$ perl -we "$file='X'; open my $fh, $file;"
Parentheses missing around "my" list at -e line 1.

$ perl -we "$file='X'; open my($fh), $file;"

$ perl -we "$file='X'; open my $fh, '<', $file;"