7 my $phonenum = shift @ARGV;
9 my $server = new Frontier::Client (
10 url => 'http://localhost/selfservice/xmlrpc.cgi',
13 my $result = $server->call('FS.SelfService.XMLRPC.phonenum_balance',
14 'phonenum' => $server->string($phonenum), # '3615588197',
17 #print Dumper($result);
18 die $result->{'error'} if $result->{'error'};