perl -e 'print join "\n", @INC';

##</code><code>##

perl -V

##</code><code>##


#!perl

use Modern::Perl;
use File::PathList;
use Data::Dumper::Concise;

my $inc = File::PathList->new( paths => \@INC );
say Dumper $inc;