in reply to List::MoreUtils before, after and ... between?
BTW: If the your main concern with your method, is the time taken to perform the reverses, don't even consider it unless your list is huge. Reverse is a particularly efficient operation. 1000 items take a just 2/10s of a millisecond:
@a = 1 .. 1e3;; $t = time; @a = reverse @a; print time() - $t;; 0.000192165374755859 $t = time; @a = reverse @a; print time() - $t;; 0.000243186950683594 $t = time; @a = reverse @a; print time() - $t;; 0.000186920166015625
|
|---|