Navigacija
Lista poslednjih: 16, 32, 64, 128 poruka.

fleksibilni nizovi...

[es] :: Perl :: fleksibilni nizovi...

[ Pregleda: 3293 | Odgovora: 1 ] > FB > Twit

Postavi temu Odgovori

Autor

Pretraga teme: Traži
Markiranje Štampanje RSS

urke
Aleksandar Urošević
Web Developer
Kragujevac

Član broj: 2997
Poruke: 317

Jabber: urke@elitesecurity.org
Sajt: https://urosevic.net


Profil

icon fleksibilni nizovi...11.08.2003. u 15:19 - pre 221 meseci
Pišem neku skriptu za čupanje podataka o konekcijama iz /var/log/messages loga. U skripti ima deo za skupljanje podataka po danima u sedmici. Taj deo izgleda ovako:

Code:

push (@dani, "$dow_text")
  unless grep (/^$dow_text$/, @dani);
  $dan_transfer{$dani[$#dani]} += $received + $sent;
  $dan_vreme{$dani[$#dani]} += $trajanje;


$dow_text su vrednosti: Saturday, Sunday, Monday, Tuesday, Wednesday, Thursday i Friday.
promenljive @dani i $dani su, ako i ostale, rezervisane na početku skripte jednim my pozivom.

Problem je sledeći: kad se izređaju svi dani u nizu @dani i stigne se do petka, sledeća subota se ne tretira kao subota već se tretira i pamti kao petak, kao i svi ostali dani.

Kako ovo da se prevaziđe, tako da se nekako "resetuje" vrednost fleksibilnog niza @dani od početka, pa da se nova vrednost pakuje za dan subota, nedelja...petak, a ne sve posle prve nedelje loga da se pakuje u petak?

Hvala svima unapred na savetima, smernicaa, ispravci... :)
 
Odgovor na temu

alkal
Aleksandar Kalanj
Beograd

Član broj: 7960
Poruke: 26
*.ptt.yu

Jabber: alkal@elitesecurity.org
Sajt: wapdata.co.cc


Profil

icon Re: fleksibilni nizovi...17.08.2003. u 14:43 - pre 221 meseci
A šta će ti niz @dani?
Zar ne može samo:
Code:

$dan_transfer{$dow_text} += $received + $sent;
$dan_vreme{$dow_text} += $trajanje;

 
Odgovor na temu

[es] :: Perl :: fleksibilni nizovi...

[ Pregleda: 3293 | Odgovora: 1 ] > FB > Twit

Postavi temu Odgovori

Navigacija
Lista poslednjih: 16, 32, 64, 128 poruka.