Help for this page

Select Code to Download


  1. or download this
    C:\test>perl -MO=Deparse -e"print scalar( 'fred', 'john', 'bill' )"
print scalar('???', '???', 'bill');
-e syntax OK
  2. or download this
    C:\test>perl -we"print scalar( 'fred', 'john', 'bill' )"
Useless use of a constant in void context at -e line 1.
Useless use of a constant in void context at -e line 1.
bill
  3. or download this
    C:\test>perl -MO=Deparse -e"print scalar( sub{'fred', 'john', 'bill'}-
+>() )"
print scalar sub {
...
}
->();
-e syntax OK
  4. or download this
    C:\test>perl -we"print scalar( sub{'fred', 'john', 'bill'}->() )"
bill