Select Code to Download

#!/usr/bin/perl

...
        die;
}
exit;

=head2 $input->click

...
=cut

sub click { ${ $_[0] }->click }