in reply to Sorting records on a single field

print for map $_->[1], sort { $b->[0] <=> $a->[0] } map [ /\(millisec\):(\d+)/, $_ ], @data;

Replies are listed 'Best First'.
Re^2: Sorting records on a single field
by kikuchiyo (Hermit) on Jan 20, 2010 at 17:39 UTC
    If the number of interest is always at the end of the lines then a simple /(\d+)$/ would do.
    A combination of rindex and substr instead of the regex would probably be even faster.

    See also this reference work for more pointers.