Re^2: Upgrading Perl codebase of older Perl version

BEGIN {
    unshift @INC, "/some/path/Net-Clacks/lib";
    unshift @INC, "/another/path/My-Secret-Module/lib";
};
use Net::Clacks;
use My::Secret::Module;
[download]

At least that's the variant i use when debugging. (Original code checks for the '--debug' flag and only unshifts the uninstalled paths if that is set).

PerlMonks XP is useless? Not anymore: XPD - Do more with your PerlMonks XP
Also check out my sisters artwork and my weekly webcomics

Comment on Re^2: Upgrading Perl codebase of older Perl version Download Code

Replies are listed 'Best First'.
Re^3: Upgrading Perl codebase of older Perl version by NERDVANA (Priest) on Sep 04, 2024 at 19:20 UTC
That works too. I prefer more like `#! /bin/sh exec perl -I /some/path/Net-Clacks/lib -I /another/path/My-Secret-Modu +le/lib myapp.pl "$@"` [download] in a file named debug_myapp.pl, which helps keep my temporary local debugging stuff out of the committed code of the project.	[reply] [d/l]
Re^4: Upgrading Perl codebase of older Perl version by cavac (Prior) on Sep 09, 2024 at 13:44 UTC
My full BEGIN checks for the "--debug" command line switch to enable the INC modifications, disable some caching/precompression algorithms (for faster startup) and also enable extra debug output: ... use Array::Contains; ... our $isDebugging; BEGIN { if(contains('--debug', \@ARGV)) { print("Development INC activated\n\n"); my $uname = 'cavac'; if(defined($ENV{PC_LINUXUSER}) && $ENV{PC_LINUXUSER} ne '') { $uname = $ENV{PC_LINUXUSER}; } unshift @INC, "/home/$uname/src/Net-Clacks/lib"; unshift @INC, "/home/$uname/src/pagecamel_framework/lib"; unshift @INC, "/home/$uname/src/pagecamel_er_base/lib"; $isDebugging = 1; } else { $isDebugging = 0; } } ... my $backend = PageCamel::CMDLine::WebBackend->new($isDebugging, $confi +gfile); $backend->run; ... [download] PerlMonks XP is useless? Not anymore: XPD - Do more with your PerlMonks XP Also check out my sisters artwork and my weekly webcomics	[reply] [d/l]