Help for this page

Select Code to Download


  1. or download this
    for (my $i= 0; $i < @ARGV; $i++) {
       if ($ARGV[$i] eq '--config') {
    ...
          $i--
       }
    }
    
  2. or download this
    for (reverse 0..$#ARGV) {
       splice(@ARGV, $_, 1) if $ARGV[$_] eq '--config';
    }