my %vals = map { $_ => $_ } sort { $a <=> $b } @_;