my $name2 = $1; substr($name2, -13) = ''; my $score2 = $12;