Thomas Bätzler wrote: > > One possibility that would work is to use > > $ref_array = [ grep /^.+$/, @$ref_array ];
It would be more efficient to use the regex /./s or the length function. Your regex has to match ALL the characters. (And it won't match if there are multiple lines in the string.) John -- use Perl; program fulfillment -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] <http://learn.perl.org/> <http://learn.perl.org/first-response>