my @galleries_found = $mech->content =~ m/(gallery\.php\?gid=\d+)/gi;


##</code><code>##

      push(@pics, $1) while $mech->content =~ m#(images/thumb/\d+/\d+/\d+\.jpg)#gi;