Help for this page

Select Code to Download


  1. or download this
    my @goners;
    for (0 .. $#ARGV) {
        unshift @goners, $_ if $ARGV[$_] eq 'hello';
    }
    splice @ARGV, $_, 1 for @goners;