Help for this page

Select Code to Download


  1. or download this
    #!/usr/local/bin/perl -w

...

print "\n";
exit;
  2. or download this
    AF1234, AF1234, OF1234
AF1234, OF1234
  3. or download this
    my @keys = sort keys %{ { map { $_ => 1 } @array1 } };