Andrej Kastrin wrote:
[...] $symbol=$e->{symbol}; print "$id|$title|$symbol\n"; }
Use the 'ref' command to find out if $symbol is an 'ARRAY' reference. If it is, use 'join' to join all the elements into a string and put it back into $symbol before you print.
-- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] <http://learn.perl.org/> <http://learn.perl.org/first-response>