<新手上路>请问perl中如何调用另一个文件中定义的函数?(急)

<新手上路>请问perl中如何调用另一个文件中定义的函数?(急)

假如在a.pl 定义了一个函数 test(),在b.pl中要调用它,并且a.pl中要使用b.pl中定义的变量,
请问如何实现啊?

require "a.pl";

ant真多……
好象有错误啊

cat ./test.pl
#!/usr/bin/perl

require "./test2.pl";

$temp = 100;

&call();

cat ./test2.pl
#!/usr/bin/perl

sub call{

        $counter = 10;
        print "\$counter=$counter\n";
        print "\$temp= $temp";
        return 0;
}

error:./test2.pl did not return a true value at ./test.pl line 3.
在test2.pl

最后加入

1;

试一试
加过了,但还是报同样的错,难道还要设什么其他环境之类的吗?
把call 方法的return去掉,试试
去过了,还是同样的ERROR


[Copy to clipboard] [ - ]
CODE:
#!/usr/bin/perl

sub call{

        $counter = 10;
        print "\$counter=$counter\n";
        print "\$temp= $temp";
}

1;

是可以的
我把它加在call()函数里面了,所以没成功,多谢啊!


QUOTE:
原帖由 hitsubunnu 于 2008-1-10 14:51 发表
在test2.pl

最后加入

1;

试一试

这个是表示什么意思?