您现在的位置: 设计龙 >> 网络编程 >> cgi教程 perl教程 >> 正文

PHP PERL区别对比

Author:x Link:www Hits: Update:2006-9-18 21:11:01
天极网摘 ViVi收藏夹 365Key 和讯网摘 POCO网摘

本文是 http://tnx.nl/php - 如果你要复制他,请保持这个链接。

翻译:ShiningRay @ Nirvana Studio
目录

  * 参数和返回值极其矛盾
  * PHP对大小写不敏感的操作使用不同的函数
  * PHP的函数命名方式的不一致
  * PHP没有词法范围
  * PHP的主名空间中函数太多
  * PHP缺少抽象令 TIMTOWTDI 走向糟糕的极端
  * 更多信息

参数和返回值极其矛盾

要展示这个问题,下面有一个函数列表,里面的函数用来匹配用户定义的内容:(也许甚至那些用PHP的人才会使用这个文档,只是用来查看该用哪个函数:P)
      匹配      替换使用      大小写不敏感      返回的数字      数组参数      返回匹配      s/m/x标志      偏移(-1=结尾)
ereg      ereg            否      所有      否      数组      无      0
ereg_replace      ereg      字符串      否      所有      否      无      无      0
eregi      ereg            否      所有      否      数组      无      0
eregi_replace      ereg      字符串      否      所有      否      无      无      0
mb_ereg      ereg[1]            否      所有      否      数组      无      0
mb_ereg_replace      ereg[1]      字符串/表达式      否      所有      否      无      有      0
mb_eregi      ereg[1]            否      所有      否      数组      无      0
mb_eregi_replace      ereg[1]      字符串      否      所有      否      无      无      0
preg_match      preg[2]            皆可      一个      否      数组      有      0
preg_match_all      preg            皆可      所有      否      数组      有      0
preg_replace      preg      字符串/表达式      皆可      无/所有      是      无      有      0
str_replace      str      字符串      否      所有      是      数字      无      0
str_ireplace      str      字符串      是      所有      是      数字      无      0
strstr, strchr      str            否      一个      否      子串      无      0
stristr      str            是      一个      否      子串      无      0
strrchr      str            否      一个      否      子串      无      -1
strpos      str            否      一个      否      索引      无      n
stripos      str            是      一个      否      索引      无      n
strrpos      char[3]            否      一个      否      索引      无      n
strripos      str            是      一个      否      索引      无      -1
mb_strpos      str[1]            否      一个      否      索引      无      n
mb_strrpos      str[1]            否      一个      否      索引      无      -1

这种问题还存在在其他的函数组里,不仅仅是匹配的这部分而已。

(在Perl中,所有这些功能都可以通过四个简单的操作符来完成。)

[1] 用于处理多字节字符
[2] PCRE regex: 所谓的“Perl兼容”的正则表达式。
[3] 在PHP5中也是字符串str
PHP对大小写不敏感的操作使用不同的函数

(这个可能会有两方面的争论。有些人认为提供不同的函数更好,即使这意味着又要记很多名词了)

在Perl中,你可以使用两个lc() 或者是 /i 标志,而PHP通常会提供一个大小写敏感的变量。而且,大小写不敏感的那些版本的函数名的命名方式也不一致。
Perl:      $foo cmp $bar      lc $foo cmp lc $bar
PHP:      strcmp($foo, $bar)      strcasecmp($foo, $bar)
           
Perl:      index($foo, $bar)      index(lc $foo, lc $bar)
PHP:      strpos($foo, $bar)      stripos($foo, $bar)
           
Perl:      $foo =~ s/foo/bar/      $foo =~ s/foo/bar/i
PHP:      $foo = str_replace('foo', 'bar', $foo)      $foo = str_ireplace(...)
PHP:      $foo = ereg_replace('foo', 'bar' ,$foo)      $foo = eregi_replace(...)
PHP的函数命名方式的不一致

  * 大小写不敏感的函数有一个'i'或者'case'在函数名的不同的位置。
  * 毫无表现上的规律 有下划线的 和 没下划线的:

下划线                         无下划线

stream_get_line               readline
disk_free_space            diskfreespace
is_object                             isset
mcal_day_of_week      jddayofweek
set_error_handler            setlocale
snmp_get_quick_print     snmpget
get_browser                getallheaders
base64_encode             urlencode
image_type_to_mime_type    imagetypes
msql_num_fields         mysql_numfields
php_uname                    phpversion
strip_tags                       stripslashes
bind_textdomain_codeset     bindtextdomain
cal_to_jd                      gregoriantojd
str_rot13                              strpos

   Perl的核心函数名则没有含有下划线的。
  * PHP 有 unlink 、link 和 rename 和系统调用一致,但是 touch 的系统调用是 utime, 不是 touch。
  * 同时你也无法确定单词的顺序:
     o 宾语 动词:base64_decode, iptcparse, str_shuffle, var_dump
     o 动词 宾语:create_function, recode_string

   Perl的核心函数都是“动词 宾语”结构的除了替代的 dbm* 函数。(注意里面的 sys 是一个前缀,而不是一个宾语。同时 flock 和 lstat 是根据系统调用命名的。shm* 和 msg* 是库函数调用)
  * "to" 还是 "2"?

   ascii2ebcdic, bin2hex, deg2rad, ip2long, cal_to_jd (jdto*, *tojd), strtolower, strtotime,

PHP没有词法范围

Perl 有词法范围和动态范围。PHP则没有。

对于为什么词法范围很重要的解释,可以参考 Coping with Scoping.


                                           PHP      Perl
超全局(Superglobal)      有      有
全局(global)                   有      有
函数局部                            有      有
词法域(块局部)            无      有
动态域                                无      有

[1] Perl有一些变量总是在main:: 命名空间中。这些类似于PHP的超全局变量。
[2] 在子过程的块中使用一个词法变量,就可以作为一个函数的局部变量。
PHP的主名空间中函数太多

(使用编译了所有核心分发包中的可用扩展的核心库,我们使用了2003年11月发布的版本)

PHP 主要函数的数量:3079 [1]
Perl主要函数的数量:206 [2]

中值PHP 函数名长度:13
平均PHP 函数名长度:13.67
中值Perl函数名长度:6
平均Perl函数名长度:6.22

注意,Perl的一些函数有简短的等价语法:

readpipe('ls -l') ==> `ls -l`
glob('*.txt')   ==> <*.txt>
readline($fh)   ==> <$fh>
quotemeta($foo)  ==> "\Q$foo"
lcfirst($foo)   ==> "\l$foo" (lc is \L)
ucfirst($foo)   ==> "\u$foo" (uc is \U)

[1] 来源:PHP Quick Reference
[2] 来源:perldoc perlfunc
PHP缺少抽象令 TIMTOWTDI* 走向糟糕的极端

*(There Is More Than One Way To Do It,有不止一种方式来完成它)

为什么PHP有3079个函数但是Perl却只有206个?在PHP中,常常有好几个十分相似的函数。在Perl中,你要了解和记住的要少很多。

另外一个重要的因素是模块的使用,尤其是DBI模块——它用来提供数据库支持,而不是把很多特性塞进内核,占用了空间却很少用到。

(不常用的模块不计算在内(所以这里排除了PHP的PEAR和Perl的IO::File)). 如果核心没有提供类似的功能,那么这些模块也会算在里面。为了简便起见,内部的工作方式将会忽略。)

[1] [2] 下一页

   
  • 上一篇文章:
  • 下一篇文章:
  • [回到标题] [回到顶部]