Commit 837c6894df2a778d378662d0a8282495ddfd8c1c
1 parent
dc7d556b
Exists in
master
and in
1 other branch
Correção do script ocr-server
Showing
1 changed file
with
1 additions
and
5 deletions
Show diff stats
usr/local/bin/ocr
| @@ -77,11 +77,7 @@ use Sys::Hostname; | @@ -77,11 +77,7 @@ use Sys::Hostname; | ||
| 77 | use IPC::Open3; | 77 | use IPC::Open3; |
| 78 | use IO::Select; | 78 | use IO::Select; |
| 79 | 79 | ||
| 80 | -use Getopt::Std; | ||
| 81 | -use vars qw( $opt_d ); | ||
| 82 | - | ||
| 83 | -#my $DEBUG = 2 | ||
| 84 | -my $DEBUG = ($opt_d ? 2 : 0); | 80 | +my $DEBUG = 0; |
| 85 | my $MAX_PGS = ($DEBUG==2 ? 1 : 0 + `cat /proc/cpuinfo | grep -e '^processor' | wc -l`); | 81 | my $MAX_PGS = ($DEBUG==2 ? 1 : 0 + `cat /proc/cpuinfo | grep -e '^processor' | wc -l`); |
| 86 | my $MAX_FILES = ( !$DEBUG ? 2 : 1) ; | 82 | my $MAX_FILES = ( !$DEBUG ? 2 : 1) ; |
| 87 | 83 |