Perl is not in charge of clicking

However, one can use the click() method provided by WWW::Mechanize.

my $perl = WWW::Mechanize->new;
$perl->get($something_interesting_from_the_net);
$perl->click;
[download]

Now, whether the clicking works or not, is another matter ;-)