Select Code to Download

my $n = $x > $y ? $x : $y;

my $n = (sort {$a <=> $b} $x, $y)[-1];

use List::Util qw(max);
my $n = max($x, $y);