Help for this page

Select Code to Download


  1. or download this
    sub mygrep (&@) {
        my $code = shift;
        my @result;
    ...
        }
        @result;
    }