in reply to undef number?
my $max = $numbers[0]; for (@numbers) { $max = $_ if $_ > $max; } [download]
Update: Added example.
That's right. The OP is not really looking for the biggest number that perl can express, but the biggest number of his own collection.