root/misc/coremod

Revision 1896 (checked in by miyagawa, 14 years ago)

misc fixes to coremod

  • Property svn:executable set to *
Line 
1 #!/usr/bin/perl
2 use strict;
3 use warnings;
4
5 use Module::CoreList;
6
7 my $mod = shift @ARGV or die "Usage: coremod Module\n";
8
9 my $ver = Module::CoreList->first_release($mod);
10 if ($ver) {
11     my $mod_version = $Module::CoreList::version{$ver}{$mod} || '(undefined)';
12     print "$mod is in core since perl $ver as $mod $mod_version\n";
13 } else {
14     print "$mod is not in core\n";
15 }
Note: See TracBrowser for help on using the browser.