Как извлечь ссылки из HTML с помощью регулярного выражения Perl?
У меня есть ОГРОМНЫЙ HTML, в котором есть много вещей, которые мне не нужны, но внутри него есть URL-адреса, представленные в следующем формате:
<a href="http://www.retailmenot.com/" class=l
Я пытаюсь извлечь URL-адреса ... Я пытался, но безрезультатно:
open(FILE,"<","HTML.htm") or die "$!";
my @str = <FILE>;
my @matches = grep { m/a href="(.+?") class=l/ } @str
Любая идея о том, как соответствовать этому?