saya tidak tahu util apa pun tetapi saya membuat sendiri kode sederhana untuk itu dengan perl:
#!/usr/bin/perl
use Net::Ping;
use POSIX qw/strftime/;
if (-e '/var/run/net_test.pid') {
print "net_test already running.\n";
exit;
} else {
system "touch /var/run/net_test.pid";
}
my $host = "www.google.com";
my $ping = Net::Ping->new('icmp');
my $result = $ping->ping($host,2);
if ($result != 1) {
$format = strftime('[%d/%m/%Y %H:%M:%S]',localtime)." Internet is not available...";
$run = `echo $format >> /var/log/virtua_net`;
while ($result != 1) {
$result = $ping->ping($host,2);
sleep 60;
}
$format = strftime('[%d/%m/%Y %H:%M:%S]',localtime)." Internet is back...";
$run = `echo $format >> /var/log/virtua_net`;
} else {
$format = strftime('[%d/%m/%Y %H:%M:%S]',localtime)." Internet is ok...";
$run = `echo $format >> /var/log/virtua_net`;
}
$ping->close();
system "rm -rf /var/run/net_test.pid" if (-e "/var/run/net_test.pid");
exit;
Apa yang dilakukannya adalah bahwa ia akan mencoba melakukan ping ke Google setiap kali berjalan dan kemudian akan mencetak ke file jika mendapat balasan atau tidak bersamaan dengan waktu sehingga Anda dapat memeriksa nanti dari jam berapa hingga jam berapa internet tidak tersedia.
Jika Anda suka, saya dapat membuat perubahan kecil untuk digunakan di windows dan Anda memang perlu menginstal ActivePerl itu saja.
Satu-satunya perubahan yang diperlukan adalah jalur dan perintah yang mungkin berbeda di windows.