for (my $i = 0; $i <= $#addrlist; $i++)
{
if ($addrlist[$i] eq $addr) { splice (@addrlist, $i, 1); }
}
FYI, coding questions should go to TCLUG-Devel.
Nick
esper at sherohman.org, on 09/12/2000 02:15:22 PM
To: tclug-list at mn-linux.org @ PMDF
cc:
Subject: [TCLUG:21227] Newbie perl question
I've got a list of email addresses, @addrlist, and an address, $addr, which
may or may not be in @addrlist and, if it is there, should be removed.
What's the easiest way to locate and remove $addr from @addrlist?
--
"Two words: Windows survives." - Craig Mundie, Microsoft senior strategist
"So does syphillis. Good thing we have penicillin." - Matthew Alton
Geek Code 3.1: GCS d- s+: a- C++ UL++$ P+>+++ L+++>++++ E- W--(++) N+ o+
!K w---$ O M- V? PS+ PE Y+ PGP t 5++ X+ R++ tv b+ DI++++ D G e* h+ r++ y+
---------------------------------------------------------------------
To unsubscribe, e-mail: tclug-list-unsubscribe at mn-linux.org
For additional commands, e-mail: tclug-list-help at mn-linux.org
-------------- next part --------------
---------------------------------------------------------------------
To unsubscribe, e-mail: tclug-list-unsubscribe at mn-linux.org
For additional commands, e-mail: tclug-list-help at mn-linux.org