#!/usr/bin/env perl use strict; use warnings; use Module::CoreList; my @moduleList = ("Data::Dumper", "File::stat", "File::Find"); foreach my $module (@moduleList) { if (Module::CoreList::is_core($module)) { print "".$module." is a core module and it was released:"; print Module::CoreList->first_release($module) . "\n"; } else { print "".$module." it is not core module!\n"; } } __END__ $ perl test.pl Data::Dumper is a core module and it was released:5.005 File::stat is a core module and it was released:5.004 File::Find is a core module and it was released:5