Use of uninitialized value in string at bot.pl line 194.

##</code><code>##

   my $mech = WWW::Mechanize->new();
   $mech->get($url);
   print $mech->uri();