by Pravin Paratey

Auto-tagging of TagBoards

This Perl snippet illustrates how one can automatically post data to tag boards. Learn how Perl does POST requests.

<?prettify linenums=true?>

# AutoTagger-Perl v0.1a (June 26, 2004)
# Pravin [pravinp at gmail dot com]
# This snippet illustrates automatic tagging of
# tag boards

use HTTP::Request::Common;
use LWP::UserAgent;

# Enter your details here
my $myname = 'pravin';
my $myurl = '';
my $mymessage = 'Test Message';

# Add taggy names to this list
my @taggylist = (

# Code Starts
$ua = LWP::UserAgent->new();
foreach (@taggylist)
	print '$_\t';
	$ua->request(POST '',
		[name => $_,
		tagname => $myname,
		tagurl =>$myurl,
		message => $mymessage]);
	print 'done\n';