for my $line (@lines) {
   my ($SNR, $val1, $val2, @rest) = split /\s+/,$line;
   print "SNR value 1:$val1, value 2:$val2\n";
}