Help for this page

Select Code to Download


  1. or download this
    use utf8; use 5.022; use strict;

...
open($fh, ">", $filename) or die "Cannot open \"$filename\" for output
+: $!\n";
print $fh "Replacement Header Text Here\n\n$column_line";
print $fh "$_\n" foreach @data_lines;
  2. or download this
    SEALEVEL SYSTEMS
SEALEVEL SYSTEMS, INC.
...
MASSTECH, INC
MASTERBILT
SE INTERNATIONAL
  3. or download this
    MASSTECH, INC
SEALEVEL SYSTEMS, INC.
...
SE INTERNATIONAL
SEALEVEL SYSTEMS
SEBASTIAN COMMUNICATIONS
  4. or download this
    MASQUE SOUND
MASSTECH, INC
...
SEALEVEL SYSTEMS
SEALEVEL SYSTEMS, INC.
SEBASTIAN COMMUNICATIONS