(sort {$a <=> $b} @x)[-1,0]