Dotaz: Spustenie *.pl suborov,perl

[Giftun]

Dobry den mam taky dotaz. Robim v mrtg.Je to podla mna super vecicka no mam problem so scriptami. Z internetu som si stiahol sript neviemco.pl Zaciatok tohto suboru je takyto:#!/usr/bin/perl Ked tento subor spustim:./neviemco.pl tak napise: 0 0 Neviem kde moze byt chyba.Prel mam nainstalovany a je vo verzii 5 aj daco.Perl som instaloval ako deb balicek. Mam linux debian 3.0. Dakujem

Odpovědi

[pasmen]

No a co ma ten skript vlastne vypsat? Co ma delat? Koukni do nej.

[Giftun]

No on,ma na html stranke vypisat uptime server a dat ho do grafu. Ale to ze mi ukaze 0 0 ked ho spustim znamena ze daco nie je v poriadku pretoze to mi urobi vzdy ked spustam takyto subor ktory ma na zaciatku /usr/bin/perl Ked spustam srcipty so zaciatkom /usr/bin/bash tak oni vypisu na obrazovku co treba.Napr.Volne mieto na disku.

[pasmen]

To jako kazdej skript v perlu vypise 0 0? Tak zkus na konec ty radky #!/usr/bin/perl pridat -w coz zapne varovani, treba to vypise neco podrobnejsiho...

[Giftun]

Trosku to pomohlo.Dakujem. Ale mne osobne to asi nepomze pretoze vypise ze mam chybu v riadku 6.Moj script vyzera takto: #!/usr/bin/perl

$uptime = `uptime`;

$uptime =~ /up (.*?) day/; $up = int($1);

print "$up\n";

A v tom siestom riadku je chyba.No neviem prist na to aka.

[unchallenger]

Ať počítám, jak počítám, nedokážu se dopočítat více než čtyř řádků.

[Giftun]

Ospravedlnujem sa. #!/usr/bin/perl -w $uptime = `uptime`;

$uptime =~ /up (.*?) day/; $up = int($1);

print "$up\n";

chybu hlasi na riadku :print "$up\n";

je to posledny riadok v srripte

[pasmen]

Tu prvni radku rozdel na dve, takhle:

#!/usr/bin/perl -w
$uptime = `uptime`;

, jinak se ti $uptime nezinicializuje coz je chyba a pak to pise 0 (coz je defaultni hodnota nezinicial. promennych)

[unchallenger]

Křišťálová koule mi vyvěštila, že to hlásí ,Use of uninitialized value ...` a že ten stroj neběží alespoň celý den, takže uptime nevypíše žádné ,day`, ale jen hodiny, takže se ten regulární výraz nemůže matchnout.

Pokud to tak není, tak je dobré nespoléhat na to, že mám křišťálovou kouli, ale napsat, co to vlastně vypíše za chybu...

V podstatě ten skript asi má dělat tohle:

$/=" ";
open F, "</proc/uptime";
print int(<F>/86400)."\n";

[pasmen]

Jo to by chtelo napsat co to vlastne hlasi, nicmene chyba je vazne v tom prvnim radku, musi se rozdelit na dva, vyzkousej...

[unchallenger]

Počítání a dělení řádků budu brát vážně, až dá ten výpis do <pre>, jinak to může být ve skutečnosti stejně jakkoli...

[Giftun]

Dakujem za odpovede. No mam este par dodatkov. 1.Ja som urobil chybu ked som daval do diskisneho fora ten moj script.Mojou chybou som to dal do jedneho riadku a nevsimol som si to, no v scripte som to mal samozrejme oddelene ale tiez vypisovalo chybu ako som uviedol.Ten PC uz bezi v kuse par dni a vypisuje to iste cize:0 0. 2.Skusil som script:

$/=" "; open F, "/proc/uptime"; print int(f/86400)."\n";

F a proc uptime maju byt v hran.zatvorkach ale musel som ich odstranit lebo mi to nechcelo dat do prispevku a script ma byt v troch riadkoch,neviem preco to hadze na jeden. Funguje.Vypise kolko dni je spusteny PC v dnoch.No ked spustim mrtg,cize chcem urobit Daemonizing cize nahodenie mrtg.cfg od znovu vypise chybu: Expected a Number for 'out' but nothing' ERROR: Target[uptime] [_OUT_] ' $$target[1] {$mode} Use of unitidialized value in pattern match (m//) at ./mrtg Use of unitidialized value in numeric lt(<) at ./mrtg ERROR: outlast is undefined.This should not be possible.

Nie som zaciatocnik s linuxom ale na druhej strane ani niaky guru.S mrtg pracujem iba par dni a neviem presne co a jak.Mohli by ste mi este prosim poradit kde je chyba?Popripadne ci niekto nepracuje s mrtg a nema graf uptime a script k tomu grafu.Dakujem.