cgi perl 页面跳转

  #!C:/strawberry/perl/bin/perl.exe use CGI; print "Content-type: text/html/n/n"; $url=$ENV{'REQUEST_URI'}; $len=length($url); $fxxCode = substr $url, 8, 8; $pos=index($url,'static'); ###print "${url}

>>阅读原文<<