mirror of
https://github.com/webmin/webmin.git
synced 2025-07-21 23:40:34 +00:00
17 lines
382 B
Perl
Executable File
17 lines
382 B
Perl
Executable File
#!/usr/local/bin/perl
|
|
# connect.cgi
|
|
# Attempt a connection to the Internet with wvdial, and show the results
|
|
|
|
require './ppp-client-lib.pl';
|
|
&ReadParse();
|
|
$theme_no_table++;
|
|
$| = 1;
|
|
&ui_print_header(undef, $text{'connect_title'}, "");
|
|
|
|
$connected = &ppp_connect($in{'section'}, 0);
|
|
&webmin_log("connect", $in{'section'}, $connected);
|
|
|
|
&ui_print_footer("", $text{'index_return'});
|
|
|
|
|