Help for this page

Select Code to Download


  1. or download this
    my @arry = (1, 2, 3, 4);
    ++$_ for @arry;
    print "$_\n" for @arry;