diff options
Diffstat (limited to 'lib')
| -rw-r--r-- | lib/Net/Plesk.pm | 11 | ||||
| -rw-r--r-- | lib/Net/Plesk/Method.pm | 1 |
2 files changed, 4 insertions, 8 deletions
diff --git a/lib/Net/Plesk.pm b/lib/Net/Plesk.pm index 62a6811..92d42e7 100644 --- a/lib/Net/Plesk.pm +++ b/lib/Net/Plesk.pm @@ -3,12 +3,9 @@ package Net::Plesk; use 5.005; use strict; -use vars qw( $VERSION @ISA $AUTOLOAD $DEBUG $PROTO_VERSION $POST_URL - @EXPORT_OK %EXPORT_TAGS ); # @EXPORT +use vars qw( $VERSION @ISA $AUTOLOAD $DEBUG $PROTO_VERSION $POST_URL ); -use Exporter; use LWP; -use Data::Dumper; use Net::Plesk::Response; use Net::Plesk::Method; @@ -22,9 +19,9 @@ use Net::Plesk::Method::client_add; use Net::Plesk::Method::client_get; use Net::Plesk::Method::client_ippool_add_ip; -@ISA = qw(Exporter); +@ISA = (); -$VERSION = '0.02'; +$VERSION = '0.03'; $PROTO_VERSION = '1.4.1.0'; @@ -208,7 +205,7 @@ sub AUTOLOAD { my $response = new Net::Plesk::Response $res->content; - warn Dumper( $response ) + warn "$response\n" if $DEBUG; $response; diff --git a/lib/Net/Plesk/Method.pm b/lib/Net/Plesk/Method.pm index df2acd4..b58f68a 100644 --- a/lib/Net/Plesk/Method.pm +++ b/lib/Net/Plesk/Method.pm @@ -20,7 +20,6 @@ Net::Plesk::Method - Perl base class for Plesk XML Remote API Method =head1 SYNOPSIS - use Exporter; @ISA = qw( Net::Plesk::Method ); =head1 DESCRIPTION |