新手求助

adminsinx

UID: 18793
帖子: 56
积分: 128
在线时间: 4 小时

1^# adminsinx 发表于 2008-12-23 15:48

新手求助

文件A

#!/usr/bin/perl -w 
 
use strict; 
use warnings; 
unshift (@INC,`pwd`); 
use 'b'; 
use vars qw($ab); 
 
print $ab;

文件B

#!/usr/bin/perl 
 
use strict; 
use warnings; 
our $ab=123;

执行perl a
如果不用use vars qw($ab);好像就找不到$ab了？？？？

ynchnluiti

UID: 39553
帖子: 24
积分: 55
在线时间: 10 分钟

2^# ynchnluiti 发表于 2008-12-23 16:23

因为a用了use strict;
perldoc strict

MMMIX

UID: 31964
帖子: 137
积分: 315
在线时间: 1 天 1 小时

3^# MMMIX 发表于 2008-12-23 16:35

-w 不要用了，用 use warnings; 吧
use vars 不要用了，用 our 吧

adminsinx

UID: 18793
帖子: 56
积分: 128
在线时间: 4 小时

4^# adminsinx 发表于 2008-12-23 16:56

QUOTE:

原帖由 MMMIX 于 2008-12-23 16:35 发表
-w 不要用了，用 use warnings; 吧
use vars 不要用了，用 our 吧

用our怎么用直接替换好像不行？

ynchnluiti

UID: 39553
帖子: 24
积分: 55
在线时间: 10 分钟

5^# ynchnluiti 发表于 2008-12-23 19:06

[Copy to clipboard] [ - ]

CODE:

#!/usr/bin/perl
use strict;
use warnings;

unshift (@INC,`pwd`);

#use 'b';
require 'b';
#use vars qw($ab);
our $ab;

print $ab;

MMMIX

UID: 31964
帖子: 137
积分: 315
在线时间: 1 天 1 小时

6^# MMMIX 发表于 2008-12-23 20:57

QUOTE:

原帖由 adminsinx 于 2008-12-23 16:56 发表

用our怎么用

perl -f our

adminsinx

UID: 18793
帖子: 56
积分: 128
在线时间: 4 小时

7^# adminsinx 发表于 2008-12-24 09:49

QUOTE:

原帖由 ynchnluiti 于 2008-12-23 19:06 发表
#!/usr/bin/perl
use strict;
use warnings;

unshift (@INC,`pwd`);

#use 'b';
require 'b';
#use vars qw($ab);
our $ab;

print $ab;

这样实现不了我把变量$ab放到另一个文件。调用另一个文件的变量是不是一定要用use vars 的？

MMMIX

UID: 31964
帖子: 137
积分: 315
在线时间: 1 天 1 小时

8^# MMMIX 发表于 2008-12-24 10:08

QUOTE:

原帖由 adminsinx 于 2008-12-24 09:49 发表

这样实现不了我把变量$ab放到另一个文件。

你怎么做的？

QUOTE:

调用另一个文件的变量是不是一定要用use vars 的？

怎么老是抱着 vars 不放？

MMMIX

UID: 31964
帖子: 137
积分: 315
在线时间: 1 天 1 小时

9^# MMMIX 发表于 2008-12-24 10:08

QUOTE:

原帖由 ynchnluiti 于 2008-12-23 19:06 发表
#!/usr/bin/perl
use strict;
use warnings;

unshift (@INC,`pwd`);

这个就没必要了，当前目录 . 默认就在 @INC 中

ynchnluiti

UID: 39553
帖子: 24
积分: 55
在线时间: 10 分钟

10^# ynchnluiti 发表于 2008-12-24 10:59

QUOTE:

原帖由 MMMIX 于 2008-12-24 10:08 发表

这个就没必要了，当前目录 . 默认就在 @INC 中

对噢。抄楼主的，没仔细看。