Help for this page

Select Code to Download


  1. or download this
    use strict;
use warnings;
...
777
888
999
  2. or download this
    aaa
aaa
...
777
888
999
  3. or download this
                print join "\n", @{$subs[0]}[1 .. $#{$subs[0]} - 1], '';