# somewhere in the main part of the script
use CGI qw/ fatalsToBrowser /;
use CGI::Carp;
...
sub WebPassWrite { 
... mumble
    open PAS,"> hf" or die $!;  #Always catch errors!!!
}