Hristo,
ako vse oshte ni si razbral edva li ima po-moshten ezik ot perl za obrabotvane na stringove. Funkciite v ezika na pruv pogled izglejdat malko, no az dori ne sam izpolzval vsichki do sega. Kato ti cheta postinga ostavam s vpechutlenie, che si pisal pone na edin ezik i za tova ti preporuchvam edna knijka na O'Rielly - Learning Perl, koqto e pisana ot avtora na perl i e samo osnovni neshta. Drugite knigi na sashtoto izdatelstvo mojesh da chetesh ako iskash poveche informaciq. Vtoroto neshto e che trqbva da se zapoznaesh dobre s regular expressions - ima kniga "Masterin Regular Expressions" nqkade po free.data.bg. Kogato gi prochetesh shte razberesh che perl + regexp pravi chudesa koito s drugite ezici bi napravil mnogo trudno. Regex mojesh edva li ne da slagash navsqkade po sourca. Veche se samnqvam che i v komentarite raboti
Shte ti dam edin realen primer kak se obrabotva veche generiran .html file taka che da raboti s druga cel:
open (FILE, "$path${user}.html") or err("$!");
while (<FILE>)
{
$_ =~ s/(<H1>Statistics for user .+<\/H1>)/$1<a href=\"statD.cgi\"><h3>Detailed statistics<\/h3><\/a><br \/>/;
$_ =~ s/src=\".+\-day\.png\"/src=\"image.cgi?id=1\"/gi;
$_ =~ s/src=\".+\-week\.png\"/src=\"image.cgi?id=2\"/gi;
$_ =~ s/src=\".+\-month\.png\"/src=\"image.cgi?id=3\"/gi;
$_ =~ s/src=\".+\-year\.png\"/src=\"image.cgi?id=4\"/gi;
$_ =~ s/mrtg-(.)\.png/images\/mrtg-$1\.png/;
print "$_";
}
close (FILE);
tozi kratuk kod (v koito polzvam samo edna f-ciq!!!) otvarq file, promenq i dobavq text, promenq vsichki linkove na kartinkite da sochat na razlichni mesta, bez da se interesuva ot tolkova konkreten input i zapazva vuzmojnostta za promqna na purvonachalniq .html taka che sled tova programata da si raboti po sashtiq naschin.
Probvai da go napravish tolkova barzo i lesno na nqkoi drug ezik da te vidq
Eto i kratuk spisuk na vgradeni f-cii v perl:
Scalar manipulation
chomp, chop, chr, crypt, hex, index, lc, lcfirst, length, oct, ord, pack, q//, qq//, reverse, rindex, sprintf, substr, tr///, uc, ucfirst, y///
Regular expressions and pattern matching
m//, pos, quotemeta, s///, split, study
Povecheto kazah veche che dori ne sam gi polzval, no tiq koito si znam s pomoshta na regex mi varshat perfectna rabota.
Nadqvam se da sam ti pomognal, vupreki che postinga ti e ot predi dve sedmici
__________________________
|