¿Cómo extraigo enlaces de HTML con una expresión regular de Perl?
Tengo un ENORME html que tiene muchas cosas que no necesito, pero dentro tiene URL que se proporcionan en el siguiente formato:
<a href="http://www.retailmenot.com/" class=l
Estoy tratando de extraer las URL ... Intenté, sin éxito:
open(FILE,"<","HTML.htm") or die "$!";
my @str = <FILE>;
my @matches = grep { m/a href="(.+?") class=l/ } @str
¿Alguna idea sobre cómo combinar esto?