my $max = "-Infinity";
...