sslug-teknik team mailing list archive
-
sslug-teknik team
-
Mailing list archive
-
Message #14406
Re: ping i et perl script
Jens Griebel wrote:
> Jeg havde planer om at lave et ganske simpelt perl script som checkede om
> der var forbindelse til internet. Jeg ville bruge ping's exit code til
> dette formål. Det virker også fint
>
> $status=(system("ping -w 5 url"));
>
> . men -w som ellers skulle stoppe ping efter x sekunder, virker kun når
> jeg er online. Når jeg er offline og kører programmet står den bare og
> venter til jeg selv laver en ctrl-c på ping.
Det er nok ikke så heldigt med ping, bedre er at se om
din forbindelse er "åben".
Her er flere måder afhængig hvilken måder du forbinder "online" på.
Jeg har et cgi-shellscript med følgende (med ppp0 interface) :
/sbin/ifconfig| grep "ppp" > /dev/null && echo on || echo off
Den returnerer "on" eller "off"
Der er også mere avancerede måder, f.eks. via /etc/ppp/ip-up
og /etc/ppp/ip-down, hvor man opretter en fil, f.eks. /tmp/#ppp_is_up
og så blot tester på om den findes.
Begge metoder har dog den lille ulempe hvis forbindelsen lukkes
fra man spurgte til man skal anvende det til noget.....
--
mvh Frank Damgaard frda@xxxxxxxxxxxxx | frank@xxxxxxxx |fido 2:236/15.2
Follow ups
References