>Paul Batt wrote:
>> use Net::Ping;
>> use strict;
>> my $host_fuer_Ping = "vobis266";
>> my $pinger = Net::Ping->new(Timeout => 10);
>> if ($pinger->ping($host_fuer_Ping)) {
>> print $host, " is alive.\n";
>> }
>>
>
>Warum ignorierst Du meine vorangegangene Mail?
Tu' ich nicht. Dies ist die erste Mail von Dir, die ich erhalte. Sorry.
>Na gut, ein letzter Versuch mit Deinem Bspl:
>
>#!/bin/perl
>use Net::Ping;
>use strict;
>my $host = "vobis266";
>my $pinger = Net::Ping->new("icmp");
>if ($pinger->ping($host)) {
> print $host, " is alive.\n";
>}
jawoll, das funktioniert! Allerdings nur als root, aber das macht nix.
Danke! Paul
--
Um aus der Liste ausgetragen zu werden, eine Mail an [EMAIL PROTECTED]
schicken, mit dem Text: unsubscribe suse-linux
