gethtml.cgi

来自「安装方法：打开weather.cgi更改各个项目可以用以下方法调用：<IFRAM」· CGI 代码 · 共 12 行

sub gethtml {
 $url=$_[0];
 require LWP::UserAgent; 
 $ua = new LWP::UserAgent; 
 $request = new HTTP::Request('GET', "$url"); 
 $response = $ua->request($request); 
 my $html = $response->{_content}; 
 return $html;
}


~1;