webservice googlemaps
Sponsored Links
Sponsored Links
Secleted [ 0 ] software to compare
Results 1 - 15 of about 41
WebService::GoogleMaps 0.07
WebService::GoogleMaps is an automated interface to Google Maps. more>>
WebService::GoogleMaps is an automated interface to Google Maps.
SYNOPSIS
use WebService::GoogleMaps;
# Set up a new object with a viewport of 640 x 480 pixels
my $gmap = WebService::GoogleMaps->new( 640, 480 );
# Specify a location to view
$gmap->set(
latitude => 40.750275,
longitude => -73.993034,
zoom_level => 4, # valid values are 0..14, lower value is more zoomed
cache_dir => "/tmp", # optional, but recommended! Helps speed up future requests
pan_x => 0, # move viewport to the east (+) or west (-) a number of pixels
pan_y => 0, # move viewport to the south (+) or north (-) a number of pixels
);
# create a GD object containing our bitmapped map object
$gmap->generate_gd();
# or simply
# $gmap->generate_gd(40.750275, -73.993034, 4); # latitude, longitude, zoom_level
my $error = $gmap->error();
$error && print "Error: $errorn";
open (FH, ">", "mymap.png");
binmode FH;
print FH $gmap->{gd}->png;
close(FH);
WebService::GoogleMaps provides an automated interface to Google Maps http://maps.google.com/, which provides free street maps of locations in the USA and Canada. This module allows you to specify an image size, latitude, longitude, and zoom level and returns a GD object containing a street level map.
<<lessSYNOPSIS
use WebService::GoogleMaps;
# Set up a new object with a viewport of 640 x 480 pixels
my $gmap = WebService::GoogleMaps->new( 640, 480 );
# Specify a location to view
$gmap->set(
latitude => 40.750275,
longitude => -73.993034,
zoom_level => 4, # valid values are 0..14, lower value is more zoomed
cache_dir => "/tmp", # optional, but recommended! Helps speed up future requests
pan_x => 0, # move viewport to the east (+) or west (-) a number of pixels
pan_y => 0, # move viewport to the south (+) or north (-) a number of pixels
);
# create a GD object containing our bitmapped map object
$gmap->generate_gd();
# or simply
# $gmap->generate_gd(40.750275, -73.993034, 4); # latitude, longitude, zoom_level
my $error = $gmap->error();
$error && print "Error: $errorn";
open (FH, ">", "mymap.png");
binmode FH;
print FH $gmap->{gd}->png;
close(FH);
WebService::GoogleMaps provides an automated interface to Google Maps http://maps.google.com/, which provides free street maps of locations in the USA and Canada. This module allows you to specify an image size, latitude, longitude, and zoom level and returns a GD object containing a street level map.
Download (0.011MB)
Added: 2006-11-24 License: Perl Artistic License Price:
1067 downloads
WebService::GoogleHack 0.15
WebService::GoogleHack is a Perl package that ties together all GoogleHack modules. more>>
WebService::GoogleHack is a Perl package that ties together all GoogleHack modules (Webservice::GoogleHack::Search, Webservice::GoogleHack::Spelling, Webservice::GoogleHack::Rate, and Webservice::GoogleHack::Text) to implement Natural Language Processing techniques that use the World Wide Web as a source of information. Use this package to access all the functionality of GoogleHack.
SYNOPSIS
use WebService::GoogleHack;
my $google = new WebService::GoogleHack;
#Initializing the object to the contents of the configuration file
# API Key, GoogleSearch.wsdl file location.
$google->initConfig("initconfig.txt");
#Printing the contents of the configuration file
$google->printConfig();
#Measure the semantic relatedness between the words "white house" and
#"president".
$measure=$google->measureSemanticRelatedness1("white house","president");
print "nRelatedness measure between white house and president is: ";
print $measure."n";
#Going to search for words that are related to "toyota" and "ford"
my @terms=();
push(@terms,"toyota");
push(@terms,"ford");
#The parameters are the search terms, number of web page results to look
#at, the number of iterations,output file and the "true" indicates that the
#diagnostic data should be stored in the file "results.txt"
$results=$google->Algorithm1(@terms,10,25,1,"results.txt","true");
print $results;
WebService::GoogleHack is a PERL package that interacts with the Google API, and implements basic functions that allow the user to interact with Google and retrieve results in an easy to use format. GoogleHack also implements and extends a number of Natural Language Processing by using the World Wide Web as a source of information.
Main features:
- Issue queries to Google (WebService::GoogleHack, WebService::GoogleHack::Search)
- Retrieve Spelling suggestions from Google (WebService::GoogleHack, WebService::GoogleHack::Spelling)
- Find the Pointwise Mututal Information (PMI) measure between two words (WebService::GoogleHack,WebService::GoogleHack::Rate)
- Given a paragraph find if the paragraph has a positive or negative semantic orientation.(WebService::GoogleHack,WebService::GoogleHack::Rate)
- Given a set of words along with a positively oriented word such as "excellent" and a negatively oriented word such as "poor", find if the word has a positive or negative semantic orientation.(WebService::GoogleHack,WebService::GoogleHack::Rate)
- Given a set of phrases along with a positively oriented word such as "excellent" and a negatively oriented word such as "poor", predict if the given phrases are positive or negative in sentiment.(WebService::GoogleHack,WebService::GoogleHack::Rate)
- Given two or more words finds a set of related words. (WebService::GoogleHack)
<<lessSYNOPSIS
use WebService::GoogleHack;
my $google = new WebService::GoogleHack;
#Initializing the object to the contents of the configuration file
# API Key, GoogleSearch.wsdl file location.
$google->initConfig("initconfig.txt");
#Printing the contents of the configuration file
$google->printConfig();
#Measure the semantic relatedness between the words "white house" and
#"president".
$measure=$google->measureSemanticRelatedness1("white house","president");
print "nRelatedness measure between white house and president is: ";
print $measure."n";
#Going to search for words that are related to "toyota" and "ford"
my @terms=();
push(@terms,"toyota");
push(@terms,"ford");
#The parameters are the search terms, number of web page results to look
#at, the number of iterations,output file and the "true" indicates that the
#diagnostic data should be stored in the file "results.txt"
$results=$google->Algorithm1(@terms,10,25,1,"results.txt","true");
print $results;
WebService::GoogleHack is a PERL package that interacts with the Google API, and implements basic functions that allow the user to interact with Google and retrieve results in an easy to use format. GoogleHack also implements and extends a number of Natural Language Processing by using the World Wide Web as a source of information.
Main features:
- Issue queries to Google (WebService::GoogleHack, WebService::GoogleHack::Search)
- Retrieve Spelling suggestions from Google (WebService::GoogleHack, WebService::GoogleHack::Spelling)
- Find the Pointwise Mututal Information (PMI) measure between two words (WebService::GoogleHack,WebService::GoogleHack::Rate)
- Given a paragraph find if the paragraph has a positive or negative semantic orientation.(WebService::GoogleHack,WebService::GoogleHack::Rate)
- Given a set of words along with a positively oriented word such as "excellent" and a negatively oriented word such as "poor", find if the word has a positive or negative semantic orientation.(WebService::GoogleHack,WebService::GoogleHack::Rate)
- Given a set of phrases along with a positively oriented word such as "excellent" and a negatively oriented word such as "poor", predict if the given phrases are positive or negative in sentiment.(WebService::GoogleHack,WebService::GoogleHack::Rate)
- Given two or more words finds a set of related words. (WebService::GoogleHack)
Download (0.088MB)
Added: 2006-11-28 License: Perl Artistic License Price:
1060 downloads
WebService::Google::Sets 0.01
WebService::Google::Sets is a Perl access to Google Labs Sets site. more>>
WebService::Google::Sets is a Perl access to Google Labs Sets site.
SYNOPSIS
use WebService::Google::Sets;
my @os_list = qw(Linux Windows Solaris);
my $expanded_os_list = get_gset(@os_list);
# check something came back
die "No results returned from server" unless $expanded_os_list;
foreach my $element (@$expanded_os_list) {
print $element, "n";
}
WebService::Google::Sets provides function based access to the Sets service hosted at Google Labs.
The Sets service attempts to expand the values you provide. The example provided in the SYNOPSIS would return an array that included "Windows NT", "HPUX" and "AIX" as values in addition to those supplied.
<<lessSYNOPSIS
use WebService::Google::Sets;
my @os_list = qw(Linux Windows Solaris);
my $expanded_os_list = get_gset(@os_list);
# check something came back
die "No results returned from server" unless $expanded_os_list;
foreach my $element (@$expanded_os_list) {
print $element, "n";
}
WebService::Google::Sets provides function based access to the Sets service hosted at Google Labs.
The Sets service attempts to expand the values you provide. The example provided in the SYNOPSIS would return an array that included "Windows NT", "HPUX" and "AIX" as values in addition to those supplied.
Download (0.003MB)
Added: 2006-11-21 License: Perl Artistic License Price:
1068 downloads
WebService::GoogleHack::Search 0.15
WebService::GoogleHack::Search is a Perlmodule used to query Google. more>>
WebService::GoogleHack::Search is a Perl module used to query Google.
SYNOPSIS
use WebService::GoogleHack::Search;
#create an object of type search
my $search = GoogleHack::Search->new();
#Query Google.
$search->searchPhrase($searchString);
#The results variable will now contain the results of your query.
#Printing the searchtime
print "n Search Time".$search->{searchTime};
#Printing the snippet element 0
print "nnSnippet".$search->{snippet}->[0];
This module provides a simple interface to the Google API. It is used by the GoogleHack module.
<<lessSYNOPSIS
use WebService::GoogleHack::Search;
#create an object of type search
my $search = GoogleHack::Search->new();
#Query Google.
$search->searchPhrase($searchString);
#The results variable will now contain the results of your query.
#Printing the searchtime
print "n Search Time".$search->{searchTime};
#Printing the snippet element 0
print "nnSnippet".$search->{snippet}->[0];
This module provides a simple interface to the Google API. It is used by the GoogleHack module.
Download (0.088MB)
Added: 2006-11-29 License: Perl Artistic License Price:
1059 downloads
WebService::Google::Suggest 0.01
WebService::Google::Suggest is a Perl module for Google Suggest as an API. more>>
WebService::Google::Suggest is a Perl module for Google Suggest as an API.
SYNOPSIS
use WebService::Google::Suggest;
my $suggest = WebService::Google::Suggest->new();
my @suggestions = $suggest->complete("goog");
for my $suggestion (@suggestions) {
print "$suggestion->{query}: $suggestion->{results} resultsn";
}
WebService::Google::Suggest allows you to use Google Suggest as a Web Service API to retrieve completions to your search query or partial query. This module is based on Adam Stiles hack (http://www.adamstiles.com/adam/2004/12/hacking_google_.html).
<<lessSYNOPSIS
use WebService::Google::Suggest;
my $suggest = WebService::Google::Suggest->new();
my @suggestions = $suggest->complete("goog");
for my $suggestion (@suggestions) {
print "$suggestion->{query}: $suggestion->{results} resultsn";
}
WebService::Google::Suggest allows you to use Google Suggest as a Web Service API to retrieve completions to your search query or partial query. This module is based on Adam Stiles hack (http://www.adamstiles.com/adam/2004/12/hacking_google_.html).
Download (0.003MB)
Added: 2006-11-21 License: Perl Artistic License Price:
1069 downloads
WebService::GoogleHack::Rate 0.15
WebService::GoogleHack::Rate is a Perl module that implements a simple relatedness measure and semantic orientation. more>>
WebService::GoogleHack::Rate is a Perl module that implements a simple relatedness measure and semantic orientation related type functions.
SYNOPSIS
use WebService::GoogleHack::Rate;
#GIVE PATH TO INPUT FILE HERE
my $INPUTFILE="";
#GIVE PATH TO TRACE FILE HERE
my $TRACEFILE="";
#create an object of type Rate
my $rate = WebService::GoogleHack::Rate->new();
$results=$rate->measureSemanticRelatedness1("dog", "cat");
#The PMI measure is stored in the variable $results, and it can also
#be accessed as $rate->{PMI};
$results=$rate->predictSemanticOrientation($INPUTFILE, "excellent", "bad",$TRACEFILE);
#The resutls can be accessed through
print $results->{prediction}."n";
$results->{PMI Measure}."n";
$rate->{prediction} &."n";
$rate->{PMI Measure}."n";
WebService::GoogleHack::Rate - This package uses Google to do some basic natural language processing. For example, given two words, say "knife" and "cut", the module has the ability to retrieve a semantic relatedness measure, commonly known as the PMI (Pointwise mututal information) measure. The larger the measure the more related the words are. The package can also predict the semantic orientation of a given paragraph of english text. A positive measure means that the paragraph has a positive meaning, and negative measure means the opposite.
<<lessSYNOPSIS
use WebService::GoogleHack::Rate;
#GIVE PATH TO INPUT FILE HERE
my $INPUTFILE="";
#GIVE PATH TO TRACE FILE HERE
my $TRACEFILE="";
#create an object of type Rate
my $rate = WebService::GoogleHack::Rate->new();
$results=$rate->measureSemanticRelatedness1("dog", "cat");
#The PMI measure is stored in the variable $results, and it can also
#be accessed as $rate->{PMI};
$results=$rate->predictSemanticOrientation($INPUTFILE, "excellent", "bad",$TRACEFILE);
#The resutls can be accessed through
print $results->{prediction}."n";
$results->{PMI Measure}."n";
$rate->{prediction} &."n";
$rate->{PMI Measure}."n";
WebService::GoogleHack::Rate - This package uses Google to do some basic natural language processing. For example, given two words, say "knife" and "cut", the module has the ability to retrieve a semantic relatedness measure, commonly known as the PMI (Pointwise mututal information) measure. The larger the measure the more related the words are. The package can also predict the semantic orientation of a given paragraph of english text. A positive measure means that the paragraph has a positive meaning, and negative measure means the opposite.
Download (0.088MB)
Added: 2006-12-04 License: Perl Artistic License Price:
1054 downloads
WebService::GoogleHack::Text 0.15
WebService::GoogleHack::Text is a Perl module that implements some basic text processing such as parsing data etc. more>>
WebService::GoogleHack::Text is a Perl module that implements some basic text processing such as parsing data etc.
SYNOPSIS
use WebService::GoogleHack::Text;
#create an object of type Text
my $text = GoogleHack::Text->new();
# returns an hash words
%results=$text->getWords("file location");
# returns an hash of 3 word sentences
%results=$text->getSentences("file location", 3);
# this function reads the configuration file
%results=$text->readConfig("location of configuration file");
#removes HTML tags
%results=$text->removeHTML("string");
This is a simple Text processing package which aids GoogleHack and Rate modules. Given a file of words, it retreives the words in the file and stores it in a simple hash format. In addition, given a file of text, it can also form n word sentences.
<<lessSYNOPSIS
use WebService::GoogleHack::Text;
#create an object of type Text
my $text = GoogleHack::Text->new();
# returns an hash words
%results=$text->getWords("file location");
# returns an hash of 3 word sentences
%results=$text->getSentences("file location", 3);
# this function reads the configuration file
%results=$text->readConfig("location of configuration file");
#removes HTML tags
%results=$text->removeHTML("string");
This is a simple Text processing package which aids GoogleHack and Rate modules. Given a file of words, it retreives the words in the file and stores it in a simple hash format. In addition, given a file of text, it can also form n word sentences.
Download (0.088MB)
Added: 2006-12-04 License: Perl Artistic License Price:
616 downloads
WebService::GoogleHack::Spelling 0.15
WebService::GoogleHack::Spelling is a Perl module that retrieves spelling suggestion given a string. more>>
WebService::GoogleHack::Spelling is a Perl module that retrieves spelling suggestion given a string.
SYNOPSIS
use WebService::GoogleHack::Spelling;
#create an object of type spelling
my $spelling = WebService::GoogleHack::Spelling->new();
#make sure to initialize the correct wsdl file
$spelling->init("key","wsdl file");
$results = $spelling->spellingSuggestion($searchString);
#$results will be a string containing the suggestion (If there is a suggestion given by Google, otherwise it would be a null variable).
#The suggested "correction" string can also be accessed by,
#$spelling->{correction};
This module interacts with Google to retrieve a spelling suggestion given a string. It is used by the WebService::GoogleHack driver module.
<<lessSYNOPSIS
use WebService::GoogleHack::Spelling;
#create an object of type spelling
my $spelling = WebService::GoogleHack::Spelling->new();
#make sure to initialize the correct wsdl file
$spelling->init("key","wsdl file");
$results = $spelling->spellingSuggestion($searchString);
#$results will be a string containing the suggestion (If there is a suggestion given by Google, otherwise it would be a null variable).
#The suggested "correction" string can also be accessed by,
#$spelling->{correction};
This module interacts with Google to retrieve a spelling suggestion given a string. It is used by the WebService::GoogleHack driver module.
Download (0.088MB)
Added: 2006-11-28 License: Perl Artistic License Price:
1060 downloads
WebService::Geograph::API 0.04
WebService::Geograph::API is a Perl interface to the Geograph.co.uk API. more>>
WebService::Geograph::API is a Perl interface to the Geograph.co.uk API.
SYNOPSIS
use WebService::Geograph::API;
my $api = new WebService::Geograph::API ( { key => your_api_key_here} ) ;
my $rv = $api->lookup ( csv, { i => 12345,
ll => 1,
thumb => 1,
}) ;
my $data = $rd->{results} ;
This module provides a simple interface to using the geograph.co.uk API service.
The actual core class, WebService::Geograph::API is a subclass of LWP::UserAgent so all the usual parameters apply.
<<lessSYNOPSIS
use WebService::Geograph::API;
my $api = new WebService::Geograph::API ( { key => your_api_key_here} ) ;
my $rv = $api->lookup ( csv, { i => 12345,
ll => 1,
thumb => 1,
}) ;
my $data = $rd->{results} ;
This module provides a simple interface to using the geograph.co.uk API service.
The actual core class, WebService::Geograph::API is a subclass of LWP::UserAgent so all the usual parameters apply.
Download (0.013MB)
Added: 2007-04-02 License: Perl Artistic License Price:
935 downloads
WebService::Mappoint 0.30
WebService::Mappoint is a client SOAP implementation for Mappoint, Microsofts geographic maps web service, based on SOAP::Lite. more>>
WebService::Mappoint is a client SOAP implementation for Mappoint, Microsofts geographic maps web service, based on SOAP::Lite.
SYNOPSIS
Map fetch example for use with Mappoint 3.0 service.
use WebService::Mappoint;
use MIME::Base64;
my $render = new WebService::Mappoint::Render();
my $map;
$map = $render->GetMap(
specification => [
DataSourceName => MapPoint.EU,
Options => [
Format => [
Height => 320,
Width => 320
],
],
Views => [
MapView:ViewByScale =>
[
CenterPoint =>
[ Latitude => 37.7632,
Longitude => -122.439702 ],
MapScale => 100000000
],
],
Pushpins => [
Pushpin =>
[
IconName => 176,
IconDataSource => MapPoint.Icons,
PinID => san_francisco,
Label => San Francisco,
ReturnsHotArea => false,
LatLong => [ Latitude => 37.7632,
Longitude => -122.439702 ],
]
]
] );
my $image = decode_base64($map->result->{MapImage}{MimeData}{Bits});
open( GIF, ">san_francisco.gif" );
print( GIF $image );
<<lessSYNOPSIS
Map fetch example for use with Mappoint 3.0 service.
use WebService::Mappoint;
use MIME::Base64;
my $render = new WebService::Mappoint::Render();
my $map;
$map = $render->GetMap(
specification => [
DataSourceName => MapPoint.EU,
Options => [
Format => [
Height => 320,
Width => 320
],
],
Views => [
MapView:ViewByScale =>
[
CenterPoint =>
[ Latitude => 37.7632,
Longitude => -122.439702 ],
MapScale => 100000000
],
],
Pushpins => [
Pushpin =>
[
IconName => 176,
IconDataSource => MapPoint.Icons,
PinID => san_francisco,
Label => San Francisco,
ReturnsHotArea => false,
LatLong => [ Latitude => 37.7632,
Longitude => -122.439702 ],
]
]
] );
my $image = decode_base64($map->result->{MapImage}{MimeData}{Bits});
open( GIF, ">san_francisco.gif" );
print( GIF $image );
Download (0.008MB)
Added: 2007-04-02 License: Perl Artistic License Price:
935 downloads
WebService::StreetMapLink::Google 0.1
WebService::StreetMapLink::Google is a WebService::StreetMapLink subclass for Google Maps. more>>
WebService::StreetMapLink::Google is a WebService::StreetMapLink subclass for Google Maps.
SYNOPSIS
use WebService::StreetMapLink;
my $map =
WebService::StreetMapLink->new
( country => usa,
address => 100 Some Street,
city => Testville,
state => MN,
postal_code => 12345,
);
my $uri = $map->uri;
This subclass generates links to Google Maps.
<<lessSYNOPSIS
use WebService::StreetMapLink;
my $map =
WebService::StreetMapLink->new
( country => usa,
address => 100 Some Street,
city => Testville,
state => MN,
postal_code => 12345,
);
my $uri = $map->uri;
This subclass generates links to Google Maps.
Download (0.017MB)
Added: 2006-11-22 License: Perl Artistic License Price:
1066 downloads
WebService::Kizasi 0.1.0
WebService::Kizasi is a Perl Interface for the Kizasi Web Services. more>>
WebService::Kizasi is a Perl Interface for the Kizasi Web Services.
SYNOPSIS
use WebService::Kizasi;
use Encode qw(_utf8_off);
my $kizapi = WebService::Kizasi->new();
my @result;
$result[0] = $kizapi->c10e_word_1d(CPAN);
$result[1] = $kizapi->c10e_word_1w(CPAN);
$result[2] = $kizapi->c10e_word_1m(CPAN);
$result[3] = $kizapi->keyword_in_context(CPAN);
$result[4] = $kizapi->ranking_1d;
$result[5] = $kizapi->ranking_1w;
$result[6] = $kizapi->ranking_1m;
for my $result (@result) {
my $utf8off = $result->items->[0]->title;
_utf8_off ($utf8off);
print $utf8off,"n";
print $result->items->[0]->pubDate,"n";
print $result->items->[0]->link,"n";
print $result->items->[0]->guid,"n";
$utf8off = $result->items->[0]->description;
_utf8_off($utf8off);
print $utf8off,"n";
}
Kizasi.jp is the sight which discovers the "sign of change" (Kizasi) from blogs, and the WebService::Kizasi is a Perl interface to the Kizasi WebService API (Kizapi). For details, see http://blog.kizasi.jp/kizasi/66.
<<lessSYNOPSIS
use WebService::Kizasi;
use Encode qw(_utf8_off);
my $kizapi = WebService::Kizasi->new();
my @result;
$result[0] = $kizapi->c10e_word_1d(CPAN);
$result[1] = $kizapi->c10e_word_1w(CPAN);
$result[2] = $kizapi->c10e_word_1m(CPAN);
$result[3] = $kizapi->keyword_in_context(CPAN);
$result[4] = $kizapi->ranking_1d;
$result[5] = $kizapi->ranking_1w;
$result[6] = $kizapi->ranking_1m;
for my $result (@result) {
my $utf8off = $result->items->[0]->title;
_utf8_off ($utf8off);
print $utf8off,"n";
print $result->items->[0]->pubDate,"n";
print $result->items->[0]->link,"n";
print $result->items->[0]->guid,"n";
$utf8off = $result->items->[0]->description;
_utf8_off($utf8off);
print $utf8off,"n";
}
Kizasi.jp is the sight which discovers the "sign of change" (Kizasi) from blogs, and the WebService::Kizasi is a Perl interface to the Kizasi WebService API (Kizapi). For details, see http://blog.kizasi.jp/kizasi/66.
Download (0.012MB)
Added: 2007-02-08 License: Perl Artistic License Price:
988 downloads
WebService::YouTube 1.0.0
WebService::YouTube is a Perl interfece to YouTube. more>>
WebService::YouTube is a Perl interfece to YouTube.
SYNOPSIS
use WebService::YouTube;
my $youtube = WebService::YouTube->new( { dev_id => YOUR_DEV_ID } );
# Get videos via REST API
my @videos = $youtube->videos->list_featured;
# Get videos via RSS Feed
my @videos = $youtube->feeds->recently_added;
<<lessSYNOPSIS
use WebService::YouTube;
my $youtube = WebService::YouTube->new( { dev_id => YOUR_DEV_ID } );
# Get videos via REST API
my @videos = $youtube->videos->list_featured;
# Get videos via RSS Feed
my @videos = $youtube->feeds->recently_added;
Download (0.046MB)
Added: 2007-04-02 License: Perl Artistic License Price:
951 downloads
WebService::FC2::SpamAPI 0.02
WebService::FC2::SpamAPI is a FC2 blog spam API client. more>>
WebService::FC2::SpamAPI is a FC2 blog spam API client.
SYNOPSIS
use WebService::FC2::SpamAPI;
my $api = WebService::FC2::SpamAPI->new();
$res = $api->check_url(http://spam.example.com);
if ( $res->is_spam ) { ....
@res = $api->get_url_list();
@res = $api->get_domain_list({ dm => foo.example.com });
FUNCTIONS
new
Constructor.
my $api = WebService::FC2::SpamAPI->new();
# use Cache ( see URI::Fetch )
my $api = WebService::FC2::SpamAPI->new({ cache => $cache_object });
check_url
Check URL for FC2 spam list. Returns WebService::FC2::SpamAPI::Response object.
# simple check
$res = $api->check_url(http://xxx.example.com);
if ( $res->is_spam ) { ....
# returns detailed data
# see also http://seo.fc2.com/spam/spamapi.php?m=h
$res = $api->check_url({ url => http://xxx.exampl.com,
usid => 0000,
data => 1, });
$res->is_spam;
$res->usid; # fc2 userid
$res->name; # site name
$res->comment; # comment
# see WebService::FC2::SpamAPI::Response
get_url_list
Get registered spam URL list. Returns WebService::FC2::SpamAPI::Response list.
@res = $api->get_url_list();
@res = $api->get_url_list({ usid => 0000 }); # grep by userid
get_domain_list
Get registered spam URL list in domain. Returns WebService::FC2::SpamAPI::Response list.
@res = $api->get_domain_list({ dm => example.com }); # dm is required.
@res = $api->get_domain_list({
dm => example.com,
usid => 0000, # grep by userid
});
<<lessSYNOPSIS
use WebService::FC2::SpamAPI;
my $api = WebService::FC2::SpamAPI->new();
$res = $api->check_url(http://spam.example.com);
if ( $res->is_spam ) { ....
@res = $api->get_url_list();
@res = $api->get_domain_list({ dm => foo.example.com });
FUNCTIONS
new
Constructor.
my $api = WebService::FC2::SpamAPI->new();
# use Cache ( see URI::Fetch )
my $api = WebService::FC2::SpamAPI->new({ cache => $cache_object });
check_url
Check URL for FC2 spam list. Returns WebService::FC2::SpamAPI::Response object.
# simple check
$res = $api->check_url(http://xxx.example.com);
if ( $res->is_spam ) { ....
# returns detailed data
# see also http://seo.fc2.com/spam/spamapi.php?m=h
$res = $api->check_url({ url => http://xxx.exampl.com,
usid => 0000,
data => 1, });
$res->is_spam;
$res->usid; # fc2 userid
$res->name; # site name
$res->comment; # comment
# see WebService::FC2::SpamAPI::Response
get_url_list
Get registered spam URL list. Returns WebService::FC2::SpamAPI::Response list.
@res = $api->get_url_list();
@res = $api->get_url_list({ usid => 0000 }); # grep by userid
get_domain_list
Get registered spam URL list in domain. Returns WebService::FC2::SpamAPI::Response list.
@res = $api->get_domain_list({ dm => example.com }); # dm is required.
@res = $api->get_domain_list({
dm => example.com,
usid => 0000, # grep by userid
});
Download (0.005MB)
Added: 2007-03-27 License: Perl Artistic License Price:
941 downloads
WebService::Yahoo::TermExtractor 0.01
WebService::Yahoo::TermExtractor is a Perl wrapper for the Yahoo! Term Extraction WebService. more>>
WebService::Yahoo::TermExtractor is a Perl wrapper for the Yahoo! Term Extraction WebService.
SYNOPSIS
use WebService::Yahoo::TermExtractor;
my $yte = WebService::Yahoo::TermExtractor->new( appid => your_app_id, context => $source_text);
my $terms = $yte->get_terms; # returns an array ref
WebService::Yahoo::TermExtractor provides a simple object-oriented wrapper around the Yahoo! Term Extraction WebService.
The Yahoo! Term Extraction WebService attempts to extract a list of significant words or phrases from the content submitted.
<<lessSYNOPSIS
use WebService::Yahoo::TermExtractor;
my $yte = WebService::Yahoo::TermExtractor->new( appid => your_app_id, context => $source_text);
my $terms = $yte->get_terms; # returns an array ref
WebService::Yahoo::TermExtractor provides a simple object-oriented wrapper around the Yahoo! Term Extraction WebService.
The Yahoo! Term Extraction WebService attempts to extract a list of significant words or phrases from the content submitted.
Download (0.003MB)
Added: 2006-12-06 License: Perl Artistic License Price:
1052 downloads
Secleted [ 0 ] software to compare
Copyright Notice:
Software piracy is theft, Using crack, password, serial numbers, registration codes, key generators is illegal and prevent future software development. The above webservice googlemaps search only lists software in full, demo and trial versions for free download. Download links are directly from our mirror sites or publisher sites, torrent files or links from rapidshare.com, yousendit.com or megaupload.com are not allowed