Select Code to Download

sub display
{
...

    return $output;
}

my $outfile = 'temp.txt';
open(my $fh, '>', $outfile) or die "Cannot open file '$outfile' for wr
+iting: $!";
print $fh find_student('x3')->display();
close($fh)                  or die "Cannot close file '$outfile': $!";