X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=get_mangareader;h=a1de0fe1ed762446a8e08392b96a20a5b69cbcb8;hb=7072dd6217d2a600f729188624f228b5700bd836;hp=8789b8e8f4749bc6d972ee3d4f8cf694553bdba8;hpb=68c4643d1f5249dafffd78731550c997d66a9fb5;p=bin.git diff --git a/get_mangareader b/get_mangareader index 8789b8e..a1de0fe 100755 --- a/get_mangareader +++ b/get_mangareader @@ -125,13 +125,17 @@ for my $manga (@manga_to_get) { print $chapter_link->url(),qq(\n); mkdir("$manga/$chapter_long"); mm_get($m,$chapter_link->url_abs()); - my $link = $m->find_link(text_regex => qr{Begin reading}); - mm_get($m,$link->url_abs()); - while ($m->uri() =~ m{\Q$chapter\E/(\d\d[^\/]*)/?$}) { - my $image = $m->find_image(alt_regex => qr{Loading\.+\s+(media|img)}); + # my $link = $m->find_link(text_regex => qr{Begin reading}); + # print $m->content(); + # exit 0; + # mm_get($m,$link->url_abs()); + print $m->uri()."\n"; + while ($m->uri() =~ m{\Q$chapter\E/?(\d\d[^\/]*)?/?$}) { + my $image = $m->find_image(alt_regex => qr{ - Page \d+}); + print $image->url_abs()."\n"; my $next_link = $m->find_link(url_regex => qr{\Q$manga_escaped\E/\Q$chapter\E/(\d\d[^\/]*)}); - mm_get($m,$image->url_abs()); print "getting ".$image->url_abs()."\n"; + mm_get($m,$image->url_abs()); my ($page) = $image->url_abs =~ m/([^\/]+)$/; $m->save_content("$manga/$chapter_long/$page"); last if not defined $next_link;