Here is my attempt (in my subroutine) at getting the info but struggling getting the href part:<A HREF="http://mylink/index.html/"><FONT SIZE="-1"><STRONG>LINK NAME< +/STRONG></FONT></A>
sub wanted { if( $_ =~ /\.html?$/) { my $name = $File::Find::name; open ( F, $name ) or die "$!: $name\n"; while($line = <F>) { if($line =~ /<title>(.+)<\/title>/i) && ($line =~ /<a hre +f(.+ ##not sure here??? { $ct++; print "FILE = $File::Find::name TITLE = $1 URL = $ +2\n"; } } close F; }
In reply to Getting URL info by Anonymous Monk
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |