Larry Rubinow wrote: > > push( @ids, split(/, |\n/, $line)) while ($line = <CLONEIDSLIST>); What about: $/ = undef; @ids = split /, |\n/, <CLONEIDSLIST>; John Porter ==== Want to unsubscribe from Fun With Perl? ==== Well, if you insist... Send mail with body "unsubscribe" to ==== fwp-request@technofile.org