Help for this page

Select Code to Download


  1. or download this
    foo($value);
    
    ...
      print "$v\n";
    }
    
  2. or download this
    my @inputArray = (1,2,3,4,5,6,7,8);
    traverseArray2(\@inputArray);
    ...
        print $aref->[$counter], "\n";
        traverseArray2($aref, $counter+1);
    }
    
  3. or download this
    my @inputArray = (1,2,3,4,5,6,7,8);
    traverseArray3(@inputArray);
    ...
        print shift, "\n";
        goto &traverseArray3;
    }