($j, $l) = (sort keys %master)[0,-1];