mirror of
https://github.com/webmin/webmin.git
synced 2026-02-03 06:03:28 +00:00
10 lines
206 B
Perl
Executable File
10 lines
206 B
Perl
Executable File
#!/usr/local/bin/perl
|
|
# Attempt a connection to the Internet with wvdial, and show the results
|
|
|
|
$no_acl_check++;
|
|
require './ppp-client-lib.pl';
|
|
|
|
&ppp_connect($config{'boot'}, 1);
|
|
exit($connected ? 0 : 1);
|
|
|