'svc' => 'svc_phone',
'desc' => 'Provision phone numbers to VoIP Innovations (formerly GlobalPOPs VoIP)',
'options' => \%options,
+ 'no_machine' => 1,
'notes' => <<'END'
Requires installation of
<a href="http://search.cpan.org/dist/Net-GlobalPOPs-MediaServicesAPI">Net::GlobalPOPs::MediaServicesAPI</a>
sub gp_command {
my( $self, $command, @args ) = @_;
- eval "use Net::GlobalPOPs::MediaServicesAPI;";
+ eval "use Net::GlobalPOPs::MediaServicesAPI 0.03;";
if ( $@ ) {
warn $@;
die $@;
sub globalpops_voip_command {
my($login, $password, $method, @args) = @_;
- eval "use Net::GlobalPOPs::MediaServicesAPI;";
+ eval "use Net::GlobalPOPs::MediaServicesAPI 0.03;";
die $@ if $@;
my $gp = new Net::GlobalPOPs