Help for this page

Select Code to Download


  1. or download this
    arrayComp(\@a, \@b);
    sub arrayComp {
        my ($aref, $bref) = @_;
        my @a = @$aref;
        my @b = @$bref;