有关 require 的问题

yagas

UID: 40864
帖子: 65
积分: 149
在线时间: 6 小时

1^# yagas 发表于 2006-09-21 16:12

有关 require 的问题

有关 require 的问题
页面 config_icn.cgi 内容
---------------------------------------------------------------------------------------------
[quote]my $leaveWord = 'data/leaveWord.cgi';
my $adminWord = 'data/admin.cgi';
1;[/quote]

页面 index.cgi 内容
--------------------------------------------------------------------------------------------
[quote]#!usr/bin/per
use CGI qw/:standard/;
use strict;

require "config_inc.cgi";

print header(-charset=>'UTF-8');

print '$adminWord='.$adminWord;[/quote]

运行报错～
特来请教高人指点

shucho

UID: 6257
帖子: 155
积分: 356
在线时间: 1 天 9 小时

2^# shucho 发表于 2006-09-21 17:16

#!usr/bin/per # 这边要p.
#!usr/bin/per # 这边要perl，不是per
use CGI qw/:standard/;
use strict;

require "config_inc.cgi";

print header(-charset=>'UTF-8');

print '$adminWord='.$adminWord; # 这边要$::adminWord, 因为你use strict;了

yagas

UID: 40864
帖子: 65
积分: 149
在线时间: 6 小时

3^# yagas 发表于 2006-09-22 21:12

谢谢，我回去试试.

yagas

UID: 40864
帖子: 65
积分: 149
在线时间: 6 小时

4^# yagas 发表于 2006-09-23 15:54

试过了，--不行呀！.
试过了，
不行呀！

cnhacktnt

UID: 40772
帖子: 111
积分: 255
在线时间: 17 小时

5^# cnhacktnt 发表于 2006-09-23 16:51

config_inc.cgi 中变量名.
config_inc.cgi 中变量名前的 my 去掉
在 index.cgi 中调用该变量的时候像 shucho 说的那样调用