Help for this page

Select Code to Download

Select or download this

#!/usr/bin/perl
#
...
    local @INC = ( "/opt/app/lib" );
    eval "use Application::Module";
}

Select or download this

#!/usr/bin/perl
#
...
use File::Find;
substr($INC{'File/Find.pm'},0,length(APPLIB)) eq APPLIB
    or die "File::Find incorrectly loaded from " . $INC{'File/Find.pm'
+};