$VAR1 = bless( do{\(my $o = 'http://search.cpan.org')}, 'URI::http' );