Re: Suddenly.... Part 2

2014-08-05 Thread Rob Dixon
On 05/08/2014 19:13, ESChamp wrote: Here's a small portion of my script: Excuse me for my confusion as I missed "Suddenly - Part 1". Are Peter Holsberg and ESChamp one and the same, as they both seem to be driving this thread? Rob --- This email is free from viruses and malware because

Re: Suddenly.... Part 2

2014-08-05 Thread Carl Inglis
I'd start by adding: use warnings; use strict; at the top just above "use Tie::File;" That way you'll find out about any syntax errors or warnings. Not that I can see any. I'd then try a simple open(my $fh, "+<", "00-copy.htm") or die "cannot open 00-copy.htm: $!"; If that works then

Re: Suddenly.... Part 2

2014-08-05 Thread ESChamp
Here's a small portion of my script: #!/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"; tie my @hfile, 'Tie::File', $copy or die "cannot tie copy and hfile $!"; tie my @bfile, 'Tie::File',

Re: Suddenly.... Part 2

2014-07-31 Thread Jim Gibson
On Jul 31, 2014, at 12:02 PM, ESChamp wrote: > John W. Krahn wrote on 7/31/2014 3:11 AM: >> Peter Holsberg wrote: >>> I think I've isolated the section that is not doing what I want. >>> >>> open (FHIN, "$recapfile") or die $!; >> >> That would be better as: >> >> open my $FHIN, '<', $recapfil

Re: Suddenly.... Part 2

2014-07-31 Thread ESChamp
John W. Krahn wrote on 7/31/2014 3:11 AM: > Peter Holsberg wrote: >> I think I've isolated the section that is not doing what I want. >> >> open (FHIN, "$recapfile") or die $!; > > That would be better as: > > open my $FHIN, '<', $recapfile or die "Cannot open '$recapfile' because: > $!"; Thank

Re: Suddenly.... Part 2

2014-07-31 Thread John W. Krahn
Peter Holsberg wrote: I think I've isolated the section that is not doing what I want. open (FHIN, "$recapfile") or die $!; That would be better as: open my $FHIN, '<', $recapfile or die "Cannot open '$recapfile' because: $!"; my $indexb; ## for the recapfile array my $ofile; You never

Suddenly.... Part 2

2014-07-30 Thread Peter Holsberg
I think I've isolated the section that is not doing what I want. open (FHIN, "$recapfile") or die $!; my $indexb; ## for the recapfile array my $ofile; # Create new array containing all the lines of recapfile up to # the string RESULTS OF BOARD 1 XYZZY: while () {