Help for this page

Select Code to Download


  1. or download this
    #!/usr/bin/perl -w
    use strict;
    ...
    my $file = "/www/htdocs/shock/history.php";
    my @words = buildLinks($file);
    print @words;
    
  2. or download this
    package BuildLink;
    
    ...
    
    1;