教程中国
PHOTOSHOP CS9.0中文版 MAYA 8.5 FOR WINDOWS Corel Painter v9.0 Flash MX2004 中文版 Illustrator cs2 中文版
VC++6.0含sp6 中英文版 VB6.0 +sp6 简体中文版 Borland Delphi 7汉化版 MSDN for vb6.0中文版 Visual Studio 2005简体
教程中国下属 文件存储共享专家BIBIDU.COM 提供大型软件,教材,源码,电影,音乐,图书等下载 更多精品请点此进入
  您目前所在位置: 教程中国 >> 编程基地 >> CGI >> Perl语言的文字处理模式之三(4) RSS订阅
Perl语言的文字处理模式之三(4)
教程(视频,书籍)下载:  ASP.NET AutoCAD 数据库 C# ASP java photoshop 网页设计 delphi 3dmax Flash C++ VB 张孝祥 实例   更多请进入BIBIDU搜索
IT搜索引擎   
范例三:
  $string="ww22cgi44";
  $string=~s/(d+)/$1*2/e;
  (d+)代表要找寻$string中一个或是多个数值的字符串,再将找到的字符串设成
$1。加上参数e是代表要把$l*2当作是一个运算式,所以$string="www44cgi44";
  $string="www22cgi44";
  $string=~s/(d+)/$1*2/eg;
  加上参数e,所以会把$1*2当作是一个运算式来看, 加上参数g就会把全部符合数 值
的字符串经过运算式运算之后再把它取代,所以$string="www44cgi88";

范例四:
  假设原本的字符串是$value="三八!",经CGI数据编码之后,这个字符串就会变成
$value="%A4T%A4K%21"。以下是一个解码的示范程序:
  $value="%A4T%A4K%2l";
  $value=~s/%([a-fA-F0-9][a-fA-F0-9])/pack("C",hex($l))/eg;

  在传送CGI数据的时候会把数据编码,其中会将特殊字符或是中文字符编码成以% 开头的连续两个十六进制数的字符串,所以要用s这个函数来找寻这个以%开头的 字符串。为了要把找到的字符串再做解码的处理, 所以要在%这个符号之后加上 ()这个符号, 表示会把找到的字符串记忆起来并指定给$1这个变量,而且要在() 中加上代表是连续两个十六进制数值的文字处理模式(Regular Expression),也 就是[a-fA-F0-9][a-fA-F0-9]。再用hex这个函数($1是代表符合的字符串)把十 六进制数值转成十进制的码,之后再用pack这个函数(以C为参数,是代表 unsigned char value的意思)把这个十进制码还原成原来的字符串。最后就会 把这个字符串解码成$value="三八!"。值得一提的是也可以把这个解码的程序 写成:

  $value=~s/%(..)/pack("C",hex($l))/eg;

来源:十度教育
作者:
关键字:Perl语言,文字处理模式之三
发表日期:2005-4-16 11:11:01

网页显示有限 阅读全文请下载本文完整版WORD文档

上一篇:本地调试PERL CGI程序之一   下一篇:用CGI编写WEB查询系统


2008-10-8 7:22:12
本文的相类似文章
  • Perl语言的文字处理模式之三(4)
  • Perl语言的文字处理模式之三(3)
  • Perl语言的文字处理模式之三(2)
  • Perl语言的文字处理模式之三(1)
  • Perl语言的文字处理模式之二
  • Perl语言的文字处理模式之一
  • 用Perl语言进行Socket编程之四
  • 用Perl语言进行Socket编程之三
  • 用Perl语言进行Socket编程之二
  • 用Perl语言进行Socket编程之一
  • 在学习中进步 在进步中成长 教程中国相随您的成长之路
    华腾联合科技股份有限公司版权所有
    广告联系:Rosibo@163.com