url编码:$str =~ s/([^A-Za-z0-9])/sprintf(”%%%02X”, ord($1))/seg;
这样编码以后,就可以放到网址中了,如:<a ref=”page_given_string.php?str=$str”>LINK</a>
对应的url解码:$str =~ s/\%([A-Fa-f0-9]{2})/pack(’C', hex($1))/seg;
看到perl正则的强大威力了吧
url编码:$str =~ s/([^A-Za-z0-9])/sprintf(”%%%02X”, ord($1))/seg;
这样编码以后,就可以放到网址中了,如:<a ref=”page_given_string.php?str=$str”>LINK</a>
对应的url解码:$str =~ s/\%([A-Fa-f0-9]{2})/pack(’C', hex($1))/seg;
看到perl正则的强大威力了吧
注:www.iu1u.com 原创,转载请保留出处,谢谢!
心血来潮,玩起Perl。为了方便,先试试windows版的,activePerl。
尝试连接mysql时遇到麻烦,mysql接口竟然没有默认安装。照了些资料,大部分资料的方法已经过期了,所以重新整理一下。
1. %perl%/bin/perl ppm-shell 出来ppm命令行,ppm是perl下的程序包管理器,应该是perl packages manager。windows下直接运行ppm,或者perl ppm,都会调出GUI的ppm,不如command line 好用。
2. perl ppm-shell install http://theoryx5.uwinnipeg.ca/ppms/DBD-mysql.ppd 找个好用的源不容易,DBI一般默认安装了,所以直接安装DBD-mysql即可。
3. 再试一下,可以连接mysql了。