From 37a0b8f2ab7ba0371d32e44ad6fb4f09fe1b35b7 Mon Sep 17 00:00:00 2001 From: Daniel Friesel Date: Mon, 12 Jul 2021 19:16:14 +0200 Subject: Handle another case of funky HAFAS html ("foo <> bar") --- lib/Travelynx/Helper/HAFAS.pm | 8 ++++++++ 1 file changed, 8 insertions(+) diff --git a/lib/Travelynx/Helper/HAFAS.pm b/lib/Travelynx/Helper/HAFAS.pm index 84226a4..6fd5c71 100644 --- a/lib/Travelynx/Helper/HAFAS.pm +++ b/lib/Travelynx/Helper/HAFAS.pm @@ -207,6 +207,14 @@ sub get_xml_p { $body =~ s{]+)lead="([^"]*)"([^"=>]*)"([^"]*)"}{ + # (replace <> with t$t) + while ( $body + =~ s{]+)lead="([^"]*)<>([^"=]*)"}{. while ( $body =~ s{]+)lead="([^"]*)
([^"=]*)"}{