diff options
author | Guilhem Moulin <guilhem@fripost.org> | 2017-07-01 19:36:46 +0200 |
---|---|---|
committer | Guilhem Moulin <guilhem@fripost.org> | 2017-07-01 19:36:46 +0200 |
commit | 7a4e51344423ee3309c258087a69dac29bf30b51 (patch) | |
tree | bd9dc6fcab0f299c7ac4b9903107994d495f6d20 /client | |
parent | 7f674213fb08129bd379d2f87e401a42899a60b8 (diff) |
Ensure fdopen is called with an integer.
Diffstat (limited to 'client')
-rwxr-xr-x | client | 4 |
1 files changed, 2 insertions, 2 deletions
@@ -62,9 +62,9 @@ my $COMMAND = shift @ARGV // die; # Untaint and fdopen(3) the configuration file and listening socket (shift @ARGV // die) =~ /\A(\d+)\z/ or die; -open my $CONFFILE, '<&=', $1 or die "fdopen $1: $!"; +open (my $CONFFILE, '<&=', $1+0) or die "fdopen $1: $!"; (shift @ARGV // die) =~ /\A(\d+)\z/ or die; -open my $S, '+<&=', $1 or die "fdopen $1: $!"; +open (my $S, '+<&=', $1+0) or die "fdopen $1: $!"; ############################################################################# |