my ($playername) = $_ =~ /name="(\w+)"/;