use strict; use warnings; BEGIN { if(defined($ARGV[0]) && $ARGV[0] eq "--debug") { print("Development INC activated\n\n"); unshift @INC, "/home/cavac/src/maplat_prodit/lib"; # my darkpan modules unshift @INC, "/home/cavac/src/maplat_framework/lib"; # my open source modules } else { print("Development INC deactivated, using default INC paths\n\n"); } } use Maplat::Worker; use Maplat::Worker::ProdIT;