in reply to Regular expressions and sort
Erm, why not just use an ST and do the matching once and not worry about clobbering $1 et al. More efficient to boot.
my @result = map { $_->[0] } sort { $a->[1] <=> $b->[1] } map { /_(\d{2})_/; [ $_, $1 ] } @f;
|
|---|
| Replies are listed 'Best First'. | |
|---|---|
|
Re^2: Regular expressions and sort
by zaro (Novice) on Nov 04, 2005 at 14:14 UTC | |
by Fletch (Bishop) on Nov 04, 2005 at 14:22 UTC |