foreach my $path (@INC) {
  my @modules = glob "$path/*.pm";
  foreach my $module (@modules) {
    print "You have module $module installed\n";
  }

}