Select Code to Download

# Temp.pm
package Temp;
printf "Context = %s\n", defined wantarray ? 0+wantarray : 'undef';
# true value, but may cause warning:
"nothing";

perl -lib=. -MTemp -we1

perl -wc Temp.pm