diff options
| author | gshapiro <gshapiro@FreeBSD.org> | 2003-09-19 23:11:30 +0000 |
|---|---|---|
| committer | gshapiro <gshapiro@FreeBSD.org> | 2003-09-19 23:11:30 +0000 |
| commit | 96b960fca637a0765d566591885b7d42576e723f (patch) | |
| tree | e6205d213aedfefacf00b4211611f436bae5e680 /contrib/sendmail/contrib/expn.pl | |
| parent | ac5ff30ae19ff6f7473f23c0d36d94301124b150 (diff) | |
| download | FreeBSD-src-96b960fca637a0765d566591885b7d42576e723f.zip FreeBSD-src-96b960fca637a0765d566591885b7d42576e723f.tar.gz | |
Import sendmail 8.12.10
Diffstat (limited to 'contrib/sendmail/contrib/expn.pl')
| -rwxr-xr-x | contrib/sendmail/contrib/expn.pl | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/contrib/sendmail/contrib/expn.pl b/contrib/sendmail/contrib/expn.pl index d67fb0f..85de08a 100755 --- a/contrib/sendmail/contrib/expn.pl +++ b/contrib/sendmail/contrib/expn.pl @@ -8,6 +8,7 @@ use 5.001; use IO::Socket; +use Fcntl; # system requirements: # must have 'nslookup' and 'hostname' programs. @@ -999,7 +1000,7 @@ sub mxlookup } $0 = "$av0 - nslookup of $server"; - open(T,">/tmp/expn$$") || die "open > /tmp/expn$$: $!\n"; + sysopen(T,"/tmp/expn$$",O_RDWR|O_CREAT|O_EXCL,0600) || die "open > /tmp/expn$$: $!\n"; print T "set querytype=MX\n"; print T "$server\n"; close(T); |
