my @scores = $FH;  # $FH.lines called automatically in list context
my $high_score= [max] @scores;