🚀 go-pugleaf

On Mon, 29 Nov 2010 13:03:35 +0100, Andrzej Adam Filip wrote:
> tomjas <tomjas@WYTNIJTOpoczta.onet.pl> pisze:
>> Witam.
>> Temat dosc enigmatyczny wiec objasnie na przykladzie o co mi chodzi.
>> Klasyczny przyklad - napisy do filmu w formacie MicroDVD czyli
>> ...
>> {63245}{63250}Jakis tekst
>> ...
>> No wlasnie - jak teraz zwiekszyc te druga liczbe (napisy wyswietlaja sie
>> za krotko). Zapewne jako poczatkujacy zabieram sie od dupy strony
>> i probuje cos takiego:
>> while(<>){s/{(\d+)}{(\d+)}/{$1}{$2}/}
>> No i teraz - co podstawic pod $2, tak by nowe $2=$2+50?
>> Z gory dzieki - na przekor twierdzeniom ostatnio na grupie ze perl
>> umiera postanowilem sie nauczyc w nim regexpow.
>
> W stylu "ochydny jednolinijkowiec":
> #v+
> while(<>){s/^{(\d+)}{(\d+)}/"{$1}{".($2+50)."}"/e
> #v-
Dzieki za odzew.
Bad evalled substitution pattern at -e line 1.