Select Code to Download

...

...

# then include the value in your final print statement
print "The largest element is: $maxval\n";

use strict;
use List::Utils qw/max/; # add this line
...

# and then use the function in your final print statement
print "The largest element is: " . max(@array) ."\n";