Select Code to Download

for (;;) {
    eval {
...
    print "WARNING: $@";
    $browser->reload();
}

while (!eval {
    $browser->get('http://www.example.org/?node=whatever');
...
    print "WARNING: $@";
    $browser->reload();
}