require的疑惑

hironics

今天用到require
我把require理解成c中的include。
但具体用到pwd.pl文件时，我想看看在文件中同时命名chdir是什么后果。
试验结果显示main中的chdir失效。有人能说说这是为什么吗？

代码如下：

!/usr/bin/perl use warnings; use strict ;#"subs"; require "pwd.pl"; sub chdir {         my$name=shift;         print "your input is $name";         } &initpwd; printf "the present workingdirectory is %s n",$ENV{PWD}; &chdir("../../"); printf "the present workingdirectory is %s n",$ENV{PWD}; __END__ sub chdir {         $name=shift;         print "you input is $namen";         }

[ 本帖最后由 hironics 于 2009-11-13 11:14 编辑 ]

DQP

我的理解是 在主文件中定义的那个chdir是在编译阶段被解析并加入到符号表中的。
而require是运行时行为， 会在之后才执行。 这样pwd.pl中的函数就会覆盖原有的同名函数。

兰花仙子

原帖由 DQP 于 2009-11-13 11:26 发表
我的理解是 在主文件中定义的那个chdir是在编译阶段被解析并加入到符号表中的。
而require是运行时行为， 会在之后才执行。 这样pwd.pl中的函数就会覆盖原有的同名函数。

正解。require在运行时执行，import进的符号会覆盖掉符号表里同名的。
另外，LZ不要重写Perl内部函数，要重写的话加上use subs ...