Help for this page

Select Code to Download


  1. or download this
    $ perl -wle 'print +(split /#/, "a#b")[1];'
b
  2. or download this
    my (undef, $a) = split ...