LinuxSir.cn,穿越时空的Linuxsir!

 找回密码
 注册
搜索
热搜: shell linux mysql
查看: 1086|回复: 3

用cgi写的登录检验码的问题

[复制链接]
发表于 2004-1-11 19:32:46 | 显示全部楼层 |阅读模式
如何加上干扰像素,如图所示的一样?

本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有帐号?注册

x
发表于 2004-1-11 19:59:48 | 显示全部楼层
imagemagick 有個AddNoise 的功能, 這個合用嗎?
http://www.imagemagick.org/www/perl.html#mani
 楼主| 发表于 2004-1-11 20:30:12 | 显示全部楼层
具体的说是用$image->Set('pixel[x,y]'=>'000099')这样的函数,使用一个循环,其中x,y分别为图像的宽和高,后面为(255,255,255)随机取一个颜色的数值。

可是我对perl编程不熟,不知道怎样实现。
发表于 2004-1-11 22:27:20 | 显示全部楼层
随机数这样:
先用srand;种下种子NEXT。。。

srand;
$a=int(rand(2));
print " $a ";

int指输出是int形,要是没有int结果就是浮点数。
您需要登录后才可以回帖 登录 | 注册

本版积分规则

快速回复 返回顶部 返回列表