%INC
- Now Perl checks if this module was loaded already.
- This is the job of
%INC
.
%INC
stores the filenames as keys
and the absolute paths to loaded files as values
:
file: examples/005_hash_inc.pl
1: use Class::Accessor;
2: while (my($k,$v) = each %INC) {
3: print "$k: $v\n";
4: }
~/examples$ perl 005_hash_inc.pl
XSLoader.pm: /home/domm/perl5/perlbrew/perls/system/li-
b/site_perl/5.24.0/x86_64-linux/XSLoader.pm
Sub/Name.pm: /home/domm/perl5/perlbrew/perls/system/li-
b/site_perl/5.24.0/x86_64-linux/Sub/Name.pm
Carp.pm: /home/domm/perl5/perlbrew/perls/system/lib/5.24.0/Carp.pm
warnings.pm: /home/domm/perl5/perlbrew/perls/system/lib/5.24.0/warnings.pm
Exporter.pm: /home/domm/perl5/perlbrew/perls/system/lib/5.24.0/Exporter.pm
strict.pm: /home/domm/perl5/perlbrew/perls/system/lib/5.24.0/strict.pm
Class/Accessor.pm: /home/domm/perl5/perlbrew/perls/sys-
tem/lib/site_perl/5.24.0/Class/Accessor.pm