Help for this page

Select Code to Download


  1. or download this
    #!/usr/local/bin/perl -w
use strict;
...
close (F1);
close (F2);
close (F3);
  2. or download this
    523-3452,joe,300,200,100,increase
624-3850,mike,500,400,100,increase
327-3958,john,100,200,-100,decrease