Help for this page

Select Code to Download


  1. or download this
    #!/usr/bin/perl-w
use strict;
use warnings;
...
    chomp $line2;
    my @words2 = $line2;
}
  2. or download this
    open (OUTPUT1, ">FF.txt");
open (OUTPUT2, ">Unmatched.txt");

...
            }
        }
    }
  3. or download this
    #!/usr/bin/perl-w
use strict;
...
    my $value = $existingfalsefriend{$searchword};
    print OUTPUT1 "$searchword\t $value\n";
}