while (<FILE>){
chomp;
next if $_ =~/\>DATA SET/;
push @array,$_;
}
Everyone seems to be making this more complicated than it
needs to be.
Superman
Make sure you qualify your data if possible.
Cheching string length may be one option
Its always good to check incomming data you may not have control of.