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