Select Code to Download

echo print join ' ', $0, $R > switch-test.pl

...
# wrong usage
perl -s switch-test.pl -- -R=OK
switch-test.pl

# after the program name
perl -s -e "print join ' ', $0, $R"  -R=OK
...
# it works in the opposite way of what perlrun states
perl -s -e "print join ' ', $0, $R" -- -R=OK
-e OK

perl -snwe "print join ' ', $0, $R, $/" -- -R=OK lorem.txt

...
-e OK
-e OK
-e OK

perl -wse  "print join ' ', $0, $R" -- -R=OK
-e OK
...
perl -sew  "print join ' ', $0, $R" -- -R=OK

#what the hell?! ..no output :)