open my $fh, '>>', $file or die $!; #### close $fh or die $!;