时间: 2021-07-31 作者:daque
树立口令 cgi的一个风趣的特性是纵然任何用户都能实行它们,但却没有方法在屏幕上表露她们。这表示着不妨做一个口令剧本: #********begin body************** if ($value[0] ne "mypassword") { print "invalid password"; } else { print ’ <body bgcolor="white"> <h1> welcome, you have entered the<p> password protected site </h1> ’; }; #*********end body*************** 要用这个剧本,须要创造一个有form的html页面。即使在form上惟有password一个box,则在运转剧本时它传播给$value[0]。 和javascript各别,用户看得见源代码,以是运用以次代码是安定的: if ($value[0] ne "mypassword") { 第一动作if语句,与在javascript中的用法一致。 在perl中,if语句各别,在于所以比拟数字仍旧文本。比拟数字,不妨用==, !=, >, < 标记。即使比拟文本,用eq确定能否十分,用ne确定能否不十分。 上头的语句决定在用户输出的文本不即是"mypassword"时将做什么。 print "invalid password"; 口令不对时打字与印刷某些消息。 } else { 要不... print ’ <body bgcolor="white"> <h1> welcome, you have entered the<p> password protected site </h1> ’; 口令精确,加入有口令养护的网站。>>