-snip- @array = (); @array = split (/\s+/, $line); -snip- # if i print $self here it prints out all of the results from that catergory