[..snip..]
> 
> while () {
>     my ($base_no, $name, $description, $PSC) = split
> /\|/;
> 

Are you absolutely sure that $PSC is getting a value
here?  If you "print $PSC" do you get a value?  It
might also help to see the data stream...

-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
http://learn.perl.org/


Reply via email to