use strict;
use warnings;
foreach my $path (@INC) {
  print "There are modules in: $path\n";
}