in reply to Sort on Number Embedded in String

You could use a Schwartzian Transform. see http://www.sysarch.com/perl/sort_paper.html 

for (map $_->[1] =>
     sort {$a->[0] <=> $b->[0]}
     map {m/fwlogsum\.(\d+)\w+/; [$1, $_]}  @files
    ){
   print "fwlog" . $_ . ".Mar2005\n";
}

[download]

A truely compassionate attitude towards other does not change, even if they behave negatively or hurt you

—His Holiness, The Dalai Lama

In Section Seekers of Perl Wisdom