Stuff

	my $ua = LWP::UserAgent->new(agent => 'ZofBot');
	my $response = $ua->get('http://www.google.com/ie?hl=en&q=' . $what);

	my $googleFirstMatch = '';
        if ($response->is_success) 
        {
        	print "OK: " . $response->content . "\n\n";
            $googleFistMatch =  $response->content;  
            print "WTF?? $googleFirstMatch\n\n";
        }
        else {
            return "Failed to reach google! ( $linkToSearch )";
        }