> Rad bi cel fajl preiskal, ce vsebuje doloceno besedo.
> poizkusil sem takole:
>
> system("/usr/bin/touch uptimer");
> system("/usr/bin/uptime >> uptimer");
>
> open (IN, "uptimer");
> $fajl=<IN>;
>
> if ($fajl =~ m/average/g) {
> print "dela\n\n";
> } else {
> print "ne dela\n\n";
> }
>
> vendar brez uspeha. Datoteka uptimer vsebuje besedico "average",
> vendar mi izpise "ne dela", ce ta besedica ni v prvi vrstici fajla.
> Zakaj?
>
> Brskal sem po online bukvah, kjer so opisani taki primeri, in tole
> je en tak, iz bukve. Meni ne dela...buuuuu :)))
>
Daj m-ju se opcijo m, ker drugace perl isce samo do prvega \n
LP Simon
