From 25103ee868628b25e2af92083827ce9b6bf5aa9a Mon Sep 17 00:00:00 2001 From: Michael Prokop Date: Thu, 12 Dec 2013 12:27:02 +0100 Subject: [PATCH] MT#5027 Use three-argument form of `open' function --- helper/tt2-daemon | 12 ++++++------ 1 file changed, 6 insertions(+), 6 deletions(-) diff --git a/helper/tt2-daemon b/helper/tt2-daemon index 2ddef080..0dd8e0be 100755 --- a/helper/tt2-daemon +++ b/helper/tt2-daemon @@ -17,13 +17,13 @@ handle_connections( $server_port ); exit; sub daemonize { - chdir '/' or croak "Can't chdir to /: $!"; - open STDIN, '/dev/null' or croak "Can't read /dev/null: $!"; - open STDOUT, '>/dev/null' or croak "Can't write to /dev/null: $!"; - defined(my $pid = fork) or croak "Can't fork: $!"; + chdir '/' or croak "Can't chdir to /: $!"; + open(STDIN, '<', '/dev/null') or croak "Can't read /dev/null: $!"; + open(STDOUT, '>', '/dev/null') or croak "Can't write to /dev/null: $!"; + defined(my $pid = fork) or croak "Can't fork: $!"; exit if $pid; - setsid or croak "Can't start a new session: $!"; - open STDERR, '>&STDOUT' or croak "Can't dup stdout: $!"; + setsid or croak "Can't start a new session: $!"; + open(STDERR, '>', '&STDOUT') or croak "Can't dup stdout: $!"; } sub get_server_port {