projects
/
lyrics-fetcher-lyricstranslate.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Fix regex for new site layout
[lyrics-fetcher-lyricstranslate.git]
/
lib
/
Lyrics
/
Fetcher
/
LyricsTranslate.pm
diff --git
a/lib/Lyrics/Fetcher/LyricsTranslate.pm
b/lib/Lyrics/Fetcher/LyricsTranslate.pm
index 983c5485354b3e20eceb7cf760e9d5b4ff8150f4..3c1016e9e2577e2602379487b18cb15a34b8f8d5 100644
(file)
--- a/
lib/Lyrics/Fetcher/LyricsTranslate.pm
+++ b/
lib/Lyrics/Fetcher/LyricsTranslate.pm
@@
-42,7
+42,7
@@
sub fetch {
return
}
$tree = HTML::TreeBuilder->new_from_content($response->{content});
return
}
$tree = HTML::TreeBuilder->new_from_content($response->{content});
- my $node = $tree->look_down(class => qr/
\btranslate-node-text\b
/);
+ my $node = $tree->look_down(class => qr/
(?<!\S)translate-node-text(?!\S)
/);
my $ltf = $node->look_down(class => qr/\bltf\b/);
my @pars = $ltf->look_down(class => 'par');
join "\n", map {
my $ltf = $node->look_down(class => qr/\bltf\b/);
my @pars = $ltf->look_down(class => 'par');
join "\n", map {
This page took
0.009995 seconds
and
4
git commands to generate.