in reply to Uppercasing Regex Output

@results = map {/.+\/.+\/(.*).pm$/ and ucfirst($1) } @list;

[download]
Examine what is said, not who speaks.
"Efficiency is intelligent laziness." -David Dunham
"Think for yourself!" - Abigail
Hooray!
Wanted!

In Section Seekers of Perl Wisdom