RE: [Nolug] PERL Question

From: Wimprine, Thomas <twimprine_at_stei.com>
Date: Thu, 14 Oct 2004 08:42:23 -0500
Message-ID: <7A727C65F1901E46BBFE6D9C4C5D82FC0255DFB8@lajeffeex02.stewartenterprises.com>

Let me clarify something if the $list[$num] does not contain $ARGV[$num]
then delete;

-----Original Message-----
From: owner-nolug@joeykelly.net [mailto:owner-nolug@joeykelly.net] On Behalf
Of Wimprine, Thomas
Sent: Thursday, October 14, 2004 8:29 AM
To: 'Nolug'
Subject: [Nolug] PERL Question

I have a script I'm working on and am stuck simply because I don't know Perl
and need a little assistance.

I have a script I execute from the command line with arguments (server
names), I need to know how to match those arguments (@ARGV) with an array
(@list) and throw away all values that do not match.

Logdisk.pl server1 server2

If $ARGV[$num] != $list[$num]
        Discard;
Else
        Next;

Thanks
___________________
Nolug mailing list
nolug@nolug.org
___________________
Nolug mailing list
nolug@nolug.org
Received on 10/14/04

This archive was generated by hypermail 2.2.0 : 12/19/08 EST