[問題] 抓網頁原始碼

[yingwan (yingwan)]

是這樣的，我寫了一個CGI用LWP 抓網頁
但是我不想呈現出網頁，只想呈現出它的HTML的原始碼，要怎麼做阿?


use CGI qw(:standard -debug);
use CGI::Carp qw(fatalsToBrowser);
use LWP::Simple;

#get input
$url=param ("url");


#fetch the page
$URL = get("http://$url");


print header();
print start_html;
print $URL;
print end_html();
exit;

謝謝好心人的指點

--
※ 發信站: 批踢踢實業坊(ptt.cc) 
◆ From: 149.159.132.73
推 LiloHuang:你需要的應該是把<跟>換成&lt;跟&gt;諸如此類的replace
→ yingwan:大感謝!!