Help for this page

Select Code to Download


  1. or download this
    #!/usr/bin/perl
    use strict;
    ...
        print $ofh $_, "\n"
            if  ! $hash{$key}++;
    }