Help for this page

Select Code to Download


  1. or download this
    my %seen;
    
    while (<FILE>)
    ...
        ($File[$i], $Name[$i], $Keywords[$i]) = ( $file, $name, $keyword )
    +;
        $i++;
    }