@a=<>=~$"..$`;map{<>=~/ .* /;push@{$'.$`},0+$&,push@{$'.1*$&},$`,0}1..$';<>=~s/\d+/@a=sort{$a-$b}keys{map@{"$&
$_"},@a}/ger;print@a."
@a"