在线时间:8:00-16:00
迪恩网络APP
随时随地掌握行业动态
扫描二维码
关注迪恩网络微信公众号
use HTTP::Request; use LWP::UserAgent; my $url = "http://".$PREF{webServer}."/index.php?act=upload&task=checkMd5&md5=".$md5."&id=".$PREF{uploadid}; my $ua = LWP::UserAgent->new; my $req = new HTTP::Request(GET => $url); my $resp = $ua->request($req); my $result = $resp->content(); if ($result eq 'wrong' ) { unlock_log_file(); fatal_error( "不能重复上传同一个文件" ); } |
请发表评论