if($line =~ /<meta name=".*?author"\s+content="([^>]*)"/i)