Select Code to Download

<mechanize>
    <get url="http://perlmonks.org/index.pl?node=login" output="login.
+html"/>
    <submit form_name="login" user="" passwd="" button="login" output=
+"index.html"/>
    <get url="http://www.perlmonks.org/index.pl?node=Newest Nodes" out
+put="newest.html"/>
</mechanize>

use strict;

...
$parser->parse_uri($ARGV[0]); 

exit(0);

package CmdHandler;
use strict;
...


1;