Hi, Perl comes with built-in safety features. Always, always:

• use strict;
• use warnings;
• check the return value of open calls:

        open (my $FILEHANDLE, '>>', $file) or die "Died: cannot open $fi
  +le: $!";
  [download]