Help for this page

Select Code to Download

Select or download this
```
$ perldoc HTTP::Response
```

Select or download this

my $res = $mech->mirror (...);
if ($res->is_success) {
...
else {
    warn "Oops: ", $res->status_line;
    }