Hey Chas,
Thursday, July 05, 2001, 1:16:05 PM, my MUA believes you used
Evolution/0.10.99 (Preview Release) to write:
>> I want to split to @Group only if the 3rd element of @Line has data.
>> I would like to put nothing in $Group[-1] if $Line[2] is empty.
>>
>> while (<>) { chomp;
>> my @Line = split(/,/);
>>
>> my @Group = split(/_/, $Line[2]) if ($Line[2]); # err msg here for uid3
>>
>> print "\n", $Line[0], $Line[1], " $Group[-1]"; # testing
>> }
>>
CO> WAG: try
CO> my @Group = split(/_/, $Line[2]) if (defined($Line[2]));
Thanks, that did it. I should just listen to myself talk sometimes. I
was just saying to a coworker, "I only want to split if $Line[2] is
defined"!
--
[EMAIL PROTECTED]
Using The Bat! (http://www.ritlabs.com/the_bat/) eMail v1.53d
Windows NT 5.0.2195 (Service Pack 1)
Your mouse has moved. Windows must now reboot. Click OK to continue.
