The program begins
#!/usr/bin/perl
use Tie::File;
use File::Copy 'copy';
use File::Spec;
my $copy=00-copy.htm;
my $recapfile=00recap.txt;
my $htmfile=00.htm;
my $ct;
tie my @bfile, 'Tie::File', $recapfile or die cannot tie recapfile and
bfile $!;
tie my @hfile, 'Tie::File', $copy
On Aug 6, 2014, at 10:55 AM, ESChamp wrote:
The program begins
#!/usr/bin/perl
You really should add these two lines:
use strict;
use warnings;
here and correct the mistakes they reveal.
use Tie::File;
use File::Copy 'copy';
use File::Spec;
my $copy=00-copy.htm;
my