Help for this page

Select Code to Download


  1. or download this
    while ( @array ) {
        my $element = shift @array;
        # or "my $element = pop @array;".
        # Now, do something with $element
    }