#!perl

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

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