my @array = qw(122 63 25 48 323 224);
@array = sort { $a <=> $b } @array;

print $array[$#array];