Don't display so many useless string in prod
This commit is contained in:
parent
c574ac60e5
commit
2f4feb3082
2 changed files with 3 additions and 3 deletions
2
check.pl
2
check.pl
|
|
@ -161,7 +161,7 @@ for my $f (readdir $dh)
|
||||||
|
|
||||||
$tmp_solution = my_crypt($sol, $filh) if ($filh);
|
$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)
|
if ($solution{$type} ne $tmp_solution)
|
||||||
{
|
{
|
||||||
|
|
|
||||||
|
|
@ -425,7 +425,7 @@ sub create_socket
|
||||||
|
|
||||||
while(my $connection = $socket->accept)
|
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);
|
threads->create(\&socket_run, $m, $connection);
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
|
|
@ -445,7 +445,7 @@ sub socket_run
|
||||||
print $connection "\n";
|
print $connection "\n";
|
||||||
$connection->flush;
|
$connection->flush;
|
||||||
}
|
}
|
||||||
say "Closing socket connection; stopping thread.";
|
#say "Closing socket connection; stopping thread.";
|
||||||
close $connection;
|
close $connection;
|
||||||
}
|
}
|
||||||
|
|
||||||
|
|
|
||||||
Reference in a new issue