aboutsummaryrefslogtreecommitdiff
path: root/examples/inspect
diff options
context:
space:
mode:
authorSergey Poznyakoff <gray@gnu.org.ua>2020-03-06 14:38:59 +0200
committerSergey Poznyakoff <gray@gnu.org.ua>2020-03-06 14:38:59 +0200
commit417659b757afc85fc437f3da462c09a4b86c1282 (patch)
tree5430de4b239bbcd71247407f44e3279d5390f2e1 /examples/inspect
parent9358876eb9b42408cef571052c6e997aa77f0c77 (diff)
downloadping903-417659b757afc85fc437f3da462c09a4b86c1282.tar.gz
ping903-417659b757afc85fc437f3da462c09a4b86c1282.tar.bz2
Version 0.5v0.5
* NEWS: Update. * configure.ac: Raise version number. * examples/lib/LWP/Ping903.pm: Remove. * examples/README: Mention Mangemanche. Remove references to lib/LWP/Ping903.pm * examples/dbload: Revert to LWP::UserAgent * examples/inspect: Likewise. * examples/ipadd: Likewise. * examples/ipdel: Likewise.
Diffstat (limited to 'examples/inspect')
-rwxr-xr-xexamples/inspect4
1 files changed, 2 insertions, 2 deletions
diff --git a/examples/inspect b/examples/inspect
index af3d3de..0aa2fb5 100755
--- a/examples/inspect
+++ b/examples/inspect
@@ -73,7 +73,7 @@ L<DBI>.
use strict;
use warnings;
-use LWP::Ping903;
+use LWP::UserAgent;
use HTTP::Status qw(:constants);
use JSON;
use Getopt::Long qw(:config gnu_getopt no_ignore_case);
@@ -99,7 +99,7 @@ GetOptions(
) or exit(1);
die "too many arguments; try `$0 --help' for more info\n" if @ARGV;
-my $ua = new LWP::Ping903;
+my $ua = new LWP::UserAgent;
my $response = $ua->get("$baseurl/config");
unless ($response->is_success) {

Return to:

Send suggestions and report system problems to the System administrator.