Uhm, no. Google can't be implemented in Perl.