从HTML中提取URL

最新推荐文章于 2025-11-02 11:36:58 发布

原创最新推荐文章于 2025-11-02 11:36:58 发布 · 1.9k 阅读

0 ·

CC 4.0 BY-SA版权

文章标签：

#html #前端

笔记专栏收录该内容

45 篇文章

订阅专栏

<!DOCTYPE html>
<html lang="en" dir="ltr">
  <head>
    <meta charset="utf-8">
    <title>joker</title>
  </head>
  <body>
    <?php
    if(getenv('REQUST_METHOD')=='POST'){
      $url = $_POST['url'];
    }
    else{
      $url = $_GET['url'];
    }
     ?>
     <form  action="<?php echo $_SERVER['PHP_SELF']; ?>" method="post">
       <p>URL: <input type="text" name="url" value="<?php echo $url ?>" /><br />
         <input type="submit" >
     </form>
     <?php
     $remoter = fopen($url,'r');{
       $html = fread($remote,1048576);
     }
     fclose($remote);

     $urls = '(http|telnet|gopher|file|wais|ftp)';
     $ltrs = '\w';
     $gunl = '/#~:.?+=&%@!';
     $punc = '.:?\-';
     $any  = '{$ltrs}{$gunl}{$punc}';

     preg_match_all("{
       \b
       {$urls}:
       [{$any}] +?
       (?=
       [{$punc}]*
       [^{$any}]
       |
       \$
       )
     }x",$html,$matches);

     printf("I found %d URLs<P>\n",sizeof($matches[0]));

     foreach($matches[0] as $u){
       $link = $_SERVER['PHP_SELF'] . '?url=' . urlencode($u);
       echo "a href=\"{$link}\">{$u}</a><br />\n";
      }
       ?>
  </body>
</html>