From 6c3c3e5c615541279cd978fe67b738f15ff3843c Mon Sep 17 00:00:00 2001 From: Andy Bavier Date: Wed, 17 Nov 2004 18:23:32 +0000 Subject: [PATCH] Use curl for PlanetLab v3 deployment --- pl_mom.pl | 5 +++-- 1 file changed, 3 insertions(+), 2 deletions(-) diff --git a/pl_mom.pl b/pl_mom.pl index 99eef4b..d441393 100755 --- a/pl_mom.pl +++ b/pl_mom.pl @@ -3,7 +3,7 @@ use POSIX qw(setsid); use Sys::Syslog; use Sys::Hostname; -use LWP::Simple; +#use LWP::Simple; $debug = 0; $proc = "pl_mom"; @@ -256,7 +256,8 @@ sub swap_used { sub get_slice_info { if (! $debug) { - $content = get "http://127.0.0.1:3100/slicestat"; + #$content = get "http://127.0.0.1:3100/slicestat"; + $content = `curl -s http://127.0.0.1:3100/slicestat`; } else { $content = `cat ../pl_mom-deploy/slicestat` } -- 2.43.0