On Wed, Jan 22, 2003 at 01:07:19PM -0000, Rob Dixon <[EMAIL PROTECTED]> wrote:
> push @files, join ' and ', delete @files[-2,-1];
Your program successfully matches the entries, prints in which files the string is
found:
Zone foo.com was found in files and boot.fixed
But it also prints the following warnings:
Use of uninitialized value in join or string at checkdomain.pl line 19, <> line 1.
This warning repeats itself for each line until line 231 (EOF).
> print "Zone $_ was found in files ", join (', ', @files),
> "\n";
> } else {
> print "Zone $_ was not found\n";
> }
> }
Through the use of the default UNIX tools I probably would've achieved the result much
quicker, but getting better in programming Perl was my aim.
I gotta admit that I'm not at the level to fully understand all of your code yet, but
hopefully with enough time and effort I'll get there someday.
Fenx for the code
Gr,
--
Marco van Lienen <[EMAIL PROTECTED]>
GPG:0x8580E6CB Available on keyservers.
We are BitchX of Borg. You will be assimilated. Using mIRC is futile
S@H:6560WU/11.069yr --> setiathome.ssl.berkeley.edu Put those CPU cycles to use!
Why did it happen ? BOFH Excuse:
Borg nanites have infested the server
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
