Re^3: Problems with forking

Replies are listed 'Best First'.
Re^4: Problems with forking by cavac (Prior) on Apr 02, 2011 at 12:52 UTC
Thanks! This is mostly a remnant of the more complex scripts that actually implement the service. They do something like this: `if(!$isCompiled && defined($ARGV[1]) && $ARGV[1] eq "--debug") { print("Development INC activated\n\n"); unshift @INC, "/home/cavac/src/maplat_prodit/lib"; unshift @INC, "/home/cavac/src/maplat_framework/lib"; $isDebugging = 1; } else { print("Development INC deactivated\n\n"); $isDebugging = 0; }` [download]	[reply] [d/l]
Re^5: Problems with forking by Anonymous Monk on Apr 02, 2011 at 14:32 UTC
See if `$ perl -le " use if $ENV{maplat_debug}, lib => 666; print for @INC" C:/perl/site/5.12.2/lib/MSWin32-x86-multi-thread C:/perl/site/5.12.2/lib C:/perl/5.12.2/lib/MSWin32-x86-multi-thread C:/perl/5.12.2/lib . $ export maplat_debug=6 $ perl -le " use if $ENV{maplat_debug}, lib => 666; print for @INC" 666 C:/perl/site/5.12.2/lib/MSWin32-x86-multi-thread C:/perl/site/5.12.2/lib C:/perl/5.12.2/lib/MSWin32-x86-multi-thread C:/perl/5.12.2/lib .` [download] See also Log::Log4perl::CommandLine which I discovered right this minute `use if Log::Log4perl->get_logger->is_debug, ...; # Then run your program my_program.pl --verbose my_program.pl -v my_program.pl --debug my_program.pl -d my_program.pl --quiet my_program.pl -q my_program.pl --debug my_program.pl --debug MyModule my_program.pl --debug MyModule,MyOtherModule --debug Foo` [download]	[reply] [d/l] [select]