Help for this page

Select Code to Download


  1. or download this
    # note, assumes we're in a scope that knows about @a and @b
    sub check_a_b {
    ...
       for (0..$#a) { return 1 if $a eq $a[$_] && $b eq $b[$_]; }
       return 0;
    }