| author | Heiko Schlittermann <hs@schlittermann.de> | 
| Tue, 21 Jun 2016 16:14:34 +0200 | |
| branch | test | 
| changeset 32 | d73a52cb6b5e | 
| parent 31 | 750b25c76ab0 | 
| child 33 | 307dbb1d05a5 | 
--- a/lib/Nagios/Check/DNS/check_tlsa_record.pm Tue Jun 21 16:07:28 2016 +0200 +++ b/lib/Nagios/Check/DNS/check_tlsa_record.pm Tue Jun 21 16:14:34 2016 +0200 @@ -18,7 +18,7 @@ my $with_cname = '^(?<cname>[_a-z]+.*\n).*'; our $tmpfile = File::Temp->new(); -my $fdname = "/dev/fd/' . fileno $tmpfile; +my $fdname = '/dev/fd/' . fileno $tmpfile; fcntl($tmpfile, F_SETFD, fcntl($tmpfile, F_GETFD, 0) & ~FD_CLOEXEC) or die "clear FD_CLOEXEC on $tmpfile: $!\n";