I seem to be capturing all my links (about 5000) in all my pages using File::Find in this part here. Is this the best way to get all my "http" and "https" links? I need to get the full http or https such as example:

http://servername/aa/bb/index.html
[download]

Here is the part I was wondering if I should improve?

if($line =~ /(https?:[^"]+)"/)
{
   print "WEB link->$1\n";
}
[download]