foreach (@lines) {
  @results = split; # splits on whitespace
  ... # do stuff with results
}

##</code><code>##

foreach (@lines) {
  @results = split /\|/; # splits on pipe char
  ... # do stuff with results
}