论坛: 菜鸟乐园 标题: perl请教?!!!! 复制本贴地址    
作者: drckness [drckness]    论坛用户   登录
[晓澜] 认为这个问题不宜在本版讨论,贴子以被转移到<< 编程破解 >>

========原贴内容如下:========

#!usr/bin/perl
$string="this is a string";
@array=split(//,$string);
foreach(@array){
if($_ne"a"){
$upcase=ork($_)&0xdf;
$string2.=chr($upcase);
}else{
$string2.=$_;
}
}
请问:我看书上说
在ascii表中,大写字符的区别在于第六位,小写字符的第六位是1,而对就大写字符的第六位是0。所以将小写字符用ord函数转换成数字,然后将该数字第六位转 换成0。最后将数字用chr函数转换字符,于是得到对应的大写字符。
请问那位perl高手能给我讲一下,上面到底说的是什么意思呀$_这个perl内置函数到底是做什么的呀?十分的感 谢您!!!





地主 发表时间: 05/20 23:11

论坛: 菜鸟乐园

20CN网络安全小组版权所有
Copyright © 2000-2010 20CN Security Group. All Rights Reserved.
论坛程序编写:NetDemon

粤ICP备05087286号