2007, May 21 -> Kiss Gabor wrote :
> $blob = reverse pack('(a3)*', reverse unpack('(a3)*', $blob));
hello,
erdekes h nalad gyorsabb a regexp-es megoldas,
en is vmi pack-es dologra gondolnek inkabb, ez igy tenyleg eleg gyors:
undef $/;
reverse pack('(i3)*', unpack('(i3)*', <>));
egy core duo macbook-on 0.6 sec, a regexp meg 2 sec...
30x futtattam mindkettot...
Atti
_________________________________________________
linux lista - [email protected]
http://mlf2.linux.rulez.org/mailman/listinfo/linux
