小编use*_*212的帖子

为什么"如果"不起作用?

my $trefer = $ENV{HTTP_REFERER}; 
my $gk1 = substr($trefer, -4);
my $gk2 = ".swf";
my $antigk = $gk1;

if ($gk1 = $gk2) { 
  $antigk = $trefer; 
} 
else 
{  
  $antigk = $link; 
}
Run Code Online (Sandbox Code Playgroud)

所以这段代码有什么问题?如果不工作,例如referal site.com/2nujroj49lni,它应该告诉我,$link但它显示我$refer

为什么?我不懂

只要它不是.swf我应该得到链接而不是我通过互联网搜索的referal,它看起来合法.就我所见,但没有错误,但仍然没有工作

perl

-3
推荐指数
1
解决办法
94
查看次数

标签 统计

perl ×1