Add support for lnp apitype/URL
authorIvan Kohler <ivan@freeside.biz>
Fri, 10 Mar 2017 23:57:40 +0000 (15:57 -0800)
committerIvan Kohler <ivan@freeside.biz>
Fri, 10 Mar 2017 23:57:40 +0000 (15:57 -0800)
Changes
README
lib/Net/Vitelity.pm

diff --git a/Changes b/Changes
index 3dcfba7..e727d50 100644 (file)
--- a/Changes
+++ b/Changes
@@ -1,5 +1,8 @@
 Revision history for Net-Vitelity
 
+0.04    unreleased
+        - Add support for lnp apitype/URL
+
 0.03    Mon Jun 25 18:00:38 PDT 2012
         - Doc/copyright/MANIFEST/Makefile.PL updates.
           Functionally unchanged from 0.02.
diff --git a/README b/README
index 9cb4e4e..719fe8f 100644 (file)
--- a/README
+++ b/README
@@ -51,6 +51,3 @@ 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/
-
index c2f3f13..e0917f1 100644 (file)
@@ -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