Google is good for primarily residential numbers. If we take an example of a Chicago area McDonald’s:

http://www.google.com/search?rls=en&q=phonebook:3128670455
(fail)

http://www.411.com/search/Reverse_Phone?phone=3128670455
(comes back with McDonald’s and more)

http://whitepages.anywho.com/results.php?qnpa=312&qnpanxx=312867&qnxx=867&qp=8670455&qstation=0455
(fail)

Lately, 411 is my favorite. If it fails on a identity it will at least tell you if it’s a land line, cellular, etc and the city / state.

The script is just fine. I had zero problems running the script.

It’s all the websites. I ran those directly against some test numbers:

http://www.google.com/search?rls=en&q=phonebook:$thenumber&ie=UTF-8&oe=UTF-8

That never works. Tried it with 20+ phone numbers and did not work. Tried with a 1, + etc, different formats.

http://phonenumbers.addresses.com/results.php?ReportType=33&qfilterpro=on&qi=0&qk=10&qnpa=$npa&qp=$qp

Does not work either. Tested with the same 20+ phone numbers and it did not work.

http://whocalled.us/do?action=getScore&name=$WhoCalled_name&pass=$WhoCalled_pass&phoneNumber=$thenumber

This only seems to work for telemarketers and debt collectors. I can see it being useful as a phone spam blocker, but not a CNAM lookup.

http://www.whitepages.com/search/ReversePhone?full_phone=$thenumber

1/20 success rate and it was a 10 year old business.

http://yellowpages.addresses.com/yellow-pages/phone:$thenumber/listings.html

2/20 and it was both old businesses again.

http://whitepages.anywho.com/results.php?&qnpa=$npa&qp=$telephone

Nothing. Again.

I guess my big question here is if this even worth the processing cycles? It seems as if there is no way to get even a 10% hit rate on the free lookup services available.

I’ve updated the code and fixed the others.

–fred

Any new updates? I can use the URLs from the script in a browser and get a good lookup, but apparently the script won’t parse the info and return it to asterisk.

Have you used the whitepages api? Net::Whitepages
I’ve tried to get it working
my $White_Pages = Net::WhitePages->new( TOKEN => ’12345′, api_key => ‘mykey’ );
my $res = $White_Pages->reverse_phone( phone => “7990989890″ );
print $res;

What is this TOKEN for? Also where am I supposed to use my api_key?

What about WWW::WhoCallsMe
I put in my listed number and it never finds it.

use WWW::WhoCallsMe;
my $who = WWW::WhoCallsMe->new;

my $number = ’9870709989′;
my $calledme = $who->fetch($number);
if ($calledme->{listed})
{
my $name = $calledme->{name};
print “The number $number is listed. “;
print “It seems that $name was calling.” if $name;
print “I don’t know who was calling, though.” unless $name;
print “\n”;
}
else
{
print “This number is not listed.\n”;
}

sub anywho_lookup {
	my ($npa, $nxx, $station) = @_;
	my $ua = LWP::UserAgent->new( timeout => 45);
	my $URL = 'http://whitepages.anywho.com/results.php?ReportType=33';
	$URL .= '&qnpa=' . $npa . '&qp=' . $nxx . $station;
	$ua->agent('AsteriskAGIQuery/1');
	my $req = new HTTP::Request GET => $URL;
	my $res = $ua->request($req);
	if ($res->is_success()) {
		if ($res->content =~ /Find More Information for (.*)< \/a>/) {
			my $listing = $1;
			return $listing;
		}
	}
	return "";
}

And I will update the post… Thanks!