in reply to Array values reformation

my @ary = map {/([^\/]+)\./; $1} @files;

UPDATE: as Limbic~Region said ; $1 is not required here

Replies are listed 'Best First'.
A reply falls below the community's threshold of quality. You may see it by logging in.