/usr/share/doc/ppp/examples/popp is in ppp 2.4.5-5ubuntu1.
This file is owned by root:root, with mode 0o644.
The actual contents of the file can be viewed below.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 | #!/usr/bin/perl -w
#
# popp connects to your provider and returns. You are able to
# see pppd proceed dialing. Once the connection is
# established pppd returns.
#
# Exit Status: taken from pppd
#
# Example: popp && mailsync
#
# This will dial your default provider, you will see pppd
# progress and as soon as the connection's established, your
# mail will get synchronized
#
# Version: 0.1 28-Dec-2001 "Tomas Pospisek" <tpo_deb@sourcepole.ch>
use strict;
my $ret;
my $pid = fork();
unless ($pid) {
# child
exec "plog -f";
} else {
# parent
my $provider = "provider" unless @ARGV;
$ret = system "pon $provider @ARGV updetach";
kill "SIGTERM", $pid;
};
exit $ret / 256; # perlbizzare
|