TextLinkAds - Retrieve Text Link Ads advertiser data
use TextLinkAds;
my $tla = TextLinkAds->new;
# Fetch link information from text-link-ads.com...
my @links = @{ $tla->fetch( $inventory_key ) };
# Output the data in some meaningful way...
print "<ul>\n";
foreach my $link ( @links ) {
my $before = $link->{BeforeText} || '';
my $after = $link->{AfterText} || '';
print <<"END_OF_HTML";
<li>
$before <a href="$link->{URL}">$link->{Text}</a> $after
</li>
END_OF_HTML
}
print '</ul>';
This module fetches advertiser information for a given Text Link Ads publisher account.
See http://www.text-link-ads.com/publisher_program.php?ref=23206.
Instantiate a new TextLinkAds object.
Optional. By default this module will try to use Cache::FileCache to store data retrieved from the text-link-ads.com site for one hour. You may use the cache parameter to provide an alternative object that implements the Cache::Cache interface. To disable caching set cache to a scalar value that resolves to false.
Optional. A temporary directory to use when caching data. The default behaviour is to use the directory determined by File::Spec->tmpdir.
Fetch advertiser information for the given key. It will first attempt to get the data from the cache where available, and failing that will send a request to text-link-ads.com, using the *_proxy environment variables and the If-Modified_Since request header.
Required. The XML Key for the desired site as provided by Text Link Ads.
Optional. In the vanilla code examples provided by Text Link Ads, both the user agent and referer CGI environment variables are included in the URI used to retrieve the XML data. While the link appears to function without them, it would probably be polite to include them where possible.
See above.
TextLinkAds requires the following modules:
TextLinkAds recommends the following modules:
Please report any bugs or feature requests to bug-textlinkads at rt.cpan.org, or through the web interface at http://rt.cpan.org/NoAuth/ReportBug.html?Queue=TextLinkAds.
You can find documentation for this module with the perldoc command.
perldoc TextLinkAds
You may also look for information at:
Dave Cardwell <dcardwell@cpan.org>
Copyright (c) 2007 Dave Cardwell. All rights reserved.
This module is free software; you can redistribute it and/or modify it under the same terms as Perl itself. See perlartistic.
