Help for this page

Select Code to Download


  1. or download this
    $ perl -MO=Concise,-exec -we'my $foo = scalar <STDIN>'
    1  <0> enter 
    ...
    5  <1> readline[t3] sKS/1
    6  <@> leave[1 ref] vKP/REFC
    -e syntax OK
    
  2. or download this
    $ perl -MO=Concise,-exec -we' $foo.=<STDIN>'
    Name "main::foo" used only once: possible typo at -e line 1.
    ...
    4  <#> rcatline[*STDIN] sS
    5  <@> leave[1 ref] vKP/REFC
    -e syntax OK