Help for this page

Select Code to Download

Select or download this

#!/bin/perl5.8.6
use strict;
...
    close $file1;
    close $file2;
}