#!/usr/bin/perl -w
use LWP::Simple;
for($i=0;$i<100;$i++)
{
$page=get("http://antirap.ru/gb?name=123&main=123&go=%C4%EE%E1%E0%E2%E8%F2%FC"); 
}