[ wwww @ 20.10.2002. 22:40 ] @
Cao,

Kkao napisati programcic koji ce koristit filehandle da otvori txt fajl i da u njega upise nesto i da ga zatvori?
Nestop tipa:

if { bilosta eq "da"} {
open (FAJL, "fajl");
kako da mu kazem da upise nesto u taj fajl?;
close (FAJL);
}


Unapred hvala

Pozdrav
[ ventura @ 20.10.2002. 22:58 ] @
print FILE, "Nesto";
[ Dragoslav Krunić @ 20.10.2002. 23:12 ] @
Oh, Bože... Ispravno je ovako:

Code:

open(MOJFAJL, ">fajl.txt"); # znak '>' znači da fajl otvaraš za pisanje
print MOJFAJL "Ovo je neki tekst..."; # kao što vidiš, zarez posle filehandle-a ne sme da stoji
close MOJFAJL; # zatvaraš filehandle
[ wwww @ 20.10.2002. 23:37 ] @
Hvala najlepse.
Mislim da ce mi ovo resiti problem....

Pozdrav
[ wwww @ 20.10.2002. 23:54 ] @
Ok. ovo radi, al ima jos jedan problem....
Ovako on meni samo izbrise staru liniju i preko nej napise novu vrednost....
meni treba da kada se svaki put pozove komada da u novom redu upise vrednost....razumete sta mislim...znaci da uvek pise u novi red...
[ bzero @ 21.10.2002. 14:57 ] @
Umesto u write, otvori file u append modu:

open(MOJFAJL, ">>fajl.txt");
[ wwww @ 22.10.2002. 22:42 ] @
Hvala puno!
Al sad mi iskrslo nestosasvim levo....
kako da pomocu readdir komande izlistam sadrzaj direktorijuma u kojem imam nekoliko slicica i da ispod svake od njih bude ispisan neki komentar???

Ivinite sto smaram.....
[ Dragoslav Krunić @ 22.10.2002. 23:35 ] @
Pa iskombinuj - sa readdir izlistavaj sadržaj direktorijuma a opis slika smeštaj u neki fajl ili bazu eventualno. Što se tiče funkcije readdir:

Code:

perldoc -f readdir


Tu imaš i lep primer.
[ wwww @ 24.10.2002. 22:49 ] @
opet ja....

Da li mogu nekom komandom da iz jednog direktorijuma na serveru kada se skripta pozove da prekopiram neki sadrzaj u drugi dir???
Hvala unapred
[ Dragoslav Krunić @ 24.10.2002. 23:03 ] @
Naravno da možeš i to recimo, pozivanjem komande 'cp' iz tvog Perl skripta.
[ wwww @ 25.10.2002. 00:10 ] @
a koja je sintaksa?
cp "FAJL" ????




P.S.
Izvinite sto smaram
[ Dragoslav Krunić @ 25.10.2002. 00:40 ] @
cp nije nikakva Perl funkcija već eksterni program. Kucaj (ako si u nekakvom UNIX-u):

Code:

man cp


ukoliko nisi upoznata sa UNIX komandom cp.
[ wwww @ 25.10.2002. 01:04 ] @
Ma znam za cp komandu al mi nije jasno kako da je iskoristim u skripti

evo na pr.
ako zelim da iskopiram fajl A iz dir-a /home/httpd/html/f1/
u dir /home/httpd/html/f2 kako to d anapisem u skripti????
[ Dragoslav Krunić @ 25.10.2002. 01:12 ] @
Uhh...

Code:

perldoc -f system


i sve će ti se samo kasti. Ima i zgodan primer.
[ wwww @ 25.10.2002. 23:48 ] @
Opet ja smaralo,

Dal postoji u perlu neka komanda koja ce an poziv da napravi neki fajl na primer:

If ($nesto eq "josnesto"){
komanda da napravi $nesto.txt
}


????
Unapred hvala
[ Dragoslav Krunić @ 26.10.2002. 00:04 ] @
Ja to lično radim sa:

Code:

open(FILE, ">fajl.dat");
close FILE;


Ovako praviš prazan fajl.

Nego, kako bi bilo da ti uzmeš jednu finu knjižicu kao što je "Teach Perl in 21 days" (ovde možeš saznati odakle možeš da je preuzmeš) i tu pročitaš sve te osnovne stvari?
[ wwww @ 26.10.2002. 00:10 ] @
Ma imam "Learning Perl" ( Randal L. Schwartz & Tom Christiansen FW by Larry Wall) al u jako velikoj sam frci a necu da preskacem lekcije...
ima iskustva sa nekim drugim programskim jezicima tako da mi programiranje ide ... imam ludih ideja al nenzam sve komande....a sada sam bas u guzvi i onda ovako pitam jer ko zna kad cu stici do toga u knjizi....
[ LimitMan @ 27.11.2002. 16:23 ] @
probaj i sa:
Code:

system "touch file.txt";

mada je bolje da koristish ovaj predlog koji ti je kolega Ixqq
dao ... tako izbegavash konflikte izmedju os-ova