package Demo2b;
$VERSION = '0.01';
use Filter::Simple sub {
print "[$_]\n";
s/(\$[a-z])/\L$1/g;
};
1;
distrib
>
Mageia
>
5
>
x86_64
>
media
>
core-release
>
by-pkgid
>
efb35c7d25726e110e99e13310cddc8d
>
files
>
11
