# just the relevant bits and pieces
my %feature = (
say => 'say',
state => 'state',
switch => 'switch',
evalbytes => 'evalbytes',
array_base => 'arybase',
current_sub => '__SUB__',
lexical_subs => 'lexsubs',
unicode_eval => 'unieval',
unicode_strings => 'unicode',
fc => 'fc',
);
my %feature_bundle = (
all => [ keys %feature ],
default => [qw(array_base)],
"5.9.5" => [qw(say state switch array_base)],
"5.10" => [qw(say state switch array_base)],
"5.11" => [qw(say state switch unicode_strings array_base)],
"5.13" => [qw(say state switch unicode_strings array_base)],
"5.15" => [qw(say state switch unicode_strings unicode_eval eval
+bytes current_sub fc)],
"5.17" => [qw(say state switch unicode_strings unicode_eval eval
+bytes current_sub fc)],
);
I have suggested to the developers to add this information to Module::CoreList as a new option -f.
Enjoy, Have FUN! H.Merijn
|