Select Code to Download

Scalar value @msgs[0] better written as $msgs[0] at f1.pl line 5.

use strict;
use warnings;
...
      print "  $line\n";
   }
}