Don't display so many useless string in prod
This commit is contained in:
parent
c574ac60e5
commit
2f4feb3082
2
check.pl
2
check.pl
|
@ -161,7 +161,7 @@ for my $f (readdir $dh)
|
|||
|
||||
$tmp_solution = my_crypt($sol, $filh) if ($filh);
|
||||
|
||||
say STDERR "check $type: $solution{$type} vs $tmp_solution";
|
||||
#say STDERR "check $type: $solution{$type} vs $tmp_solution";
|
||||
|
||||
if ($solution{$type} ne $tmp_solution)
|
||||
{
|
||||
|
|
|
@ -425,7 +425,7 @@ sub create_socket
|
|||
|
||||
while(my $connection = $socket->accept)
|
||||
{
|
||||
say "New connexion, new thread ready for parsing actions!";
|
||||
#say "New connexion, new thread ready for parsing actions!";
|
||||
threads->create(\&socket_run, $m, $connection);
|
||||
}
|
||||
}
|
||||
|
@ -445,7 +445,7 @@ sub socket_run
|
|||
print $connection "\n";
|
||||
$connection->flush;
|
||||
}
|
||||
say "Closing socket connection; stopping thread.";
|
||||
#say "Closing socket connection; stopping thread.";
|
||||
close $connection;
|
||||
}
|
||||
|
||||
|
|
Loading…
Reference in New Issue