$mailprog='d:\WEBSVR\blat\blat.exe';
  warn "Couldnīt locate the mail program at $mailprog\n" unless -x $mailprog;