> This should be:
>
> open (HANDLE, $listelem) or die "open: $listelem: $!";
>
> That way if the open fails for any reason you'll get a sensible
> error message. (And it avoids the race condition.)
>
Thank you. This is about the 6th version I have tried for
this command, and I like this one best.
> > #Grab main file contents
> > chomp (my @filecontents = <HANDLE>);
> >
> > while (<HANDLE>) {
> > my $filecontents =~ s/\|/h/;
> > }
>
> And here you need to loop over the array and do the substitution
> on each element:
>
> s/\|/h/g foreach @filecontents;
>
Works like a charm. I sure appreciate your help.
It's going to take me a few years to figure out (even generally)
what all these commands are doing. Sure is an intriguing
language.
Mike
> --
> Steve
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
