summaryrefslogtreecommitdiff
path: root/lib/Net/Vitelity.pm
diff options
context:
space:
mode:
Diffstat (limited to 'lib/Net/Vitelity.pm')
-rw-r--r--lib/Net/Vitelity.pm18
1 files changed, 9 insertions, 9 deletions
diff --git a/lib/Net/Vitelity.pm b/lib/Net/Vitelity.pm
index c2f3f13..e0917f1 100644
--- a/lib/Net/Vitelity.pm
+++ b/lib/Net/Vitelity.pm
@@ -10,7 +10,7 @@ Net::Vitelity - Interface to Vitelity API
=cut
-our $VERSION = '0.03';
+our $VERSION = '0.04';
our $AUTOLOAD;
@@ -19,8 +19,9 @@ our $AUTOLOAD;
use Net::Vitelity;
my $vitelity = Net::Vitelity->new(
- 'login' => $your_login,
- 'pass' => $your_pass,
+ 'login' => $your_login,
+ 'pass' => $your_pass,
+ 'apitype' => 'api', #api, fax or lnp
);
=head1 METHODS
@@ -53,11 +54,13 @@ sub AUTOLOAD {
#XXX md5 encrypt pass
- my $URL_API = 'http://64.74.178.105/api.php';
- my $URL_FAX = 'http://64.74.178.105/fax.php';
+ my $URL_API = 'http://api.vitelity.net/api.php';
+ my $URL_FAX = 'http://api.vitelity.net/fax.php';
+ my $URL_LNP = 'http://api.vitelity.net/lnp.php';
my $url = $URL_API;
$url = $URL_FAX if $self->{apitype} eq 'fax';
+ $url = $URL_FAX if $self->{apitype} eq 'lnp';
my $response = $ua->post($url, {
login => $self->{login},
@@ -342,12 +345,9 @@ ticketing and customer signup and self-service web interfaces.
http://freeside.biz/
-Development sponsored by Voice Carrier LLC. If you need a hosted or on-site
-PBX, please visit http://www.voicecarrier.com/
-
=head1 COPYRIGHT & LICENSE
-Copyright 2009-2012 Freeside Internet Services, Inc.
+Copyright 2009-2017 Freeside Internet Services, Inc.
All rights reserved.
This program is free software; you can redistribute it and/or modify it