in reply to Ternary vs. Sort vs. Max
For completeness, the preferred "artistic" solution:
my $n = [ $y => $x ] -> [ $x >= $y ]; [download]