git-svn-id: svn+ssh://svn.dolda2000.com/srv/svn/repos/src/utils@778
959494ce-11ee-0310-bf91-
de5d638817bd
}
$ret{"url"} = geturl $id;
}
$ret{"url"} = geturl $id;
- ($buf) = ($html =~ /\<TITLE\>Anime News Network - ([^<]*)<\/TITLE>/);
+ ($buf) = ($html =~ /\<title\>([^<]*) - Anime News Network<\/title>/);
if($buf =~ /\([^\)]+\)$/) {
($ret{"name"}, $ret{"type"}) = ($buf =~ /^(.*[^\s])\s*\(([^\)]+)\)$/);
} else {
if($buf =~ /\([^\)]+\)$/) {
($ret{"name"}, $ret{"type"}) = ($buf =~ /^(.*[^\s])\s*\(([^\)]+)\)$/);
} else {