perl + google

как бы искать в гугле, без тупого парсинга, гета, курла етц? может какой хмпп попользовать? есть идеи какие? нет::гугл хз каким макаром работает... вот.. обидно