Select Code to Download

require '/path/to/some/script.pl';

use lib '/path/to/some';
require 'script.pl';

package module;

...
warn 'module INC: ', $INC{'required1.pl'};

__PACKAGE__

#!/usr/bin/perl
use warnings;
...
subroutine();

1;

#!/usr/bin/perl
use warnings;
...
warn 'script INC ', $INC{'required1.pl'};

subroutine();

my %_INC = %INC;

# ...

%INC = %_INC;