package net; BEGIN { for( qw(HTTP_PROXY http_proxy) ) { delete $ENV{$_}; } } $Is_Win32 = ($^O eq "MSWin32"); # Configure these for your local system $httpserver = "localhost:8529"; $perldir = "/perl"; ####################################### %callback_hooks = (); { package main; # avoid -w warnings sub dummy_sub { return($net::httpserver, $net::perldir, $net::Is_Win32, %net::callback_hooks, ); } } 1;