在perl怎样取值。。。

在perl怎样取值。。。

有个shell中设置了很多变量,我想在perl中得到变量的值。该怎么办?
首先感谢放驴娃提供的下列方法,现在的问题是这样也不好使,还请指教。。
如下:
1. common.csh中内容:
set test1=a
set test2=$test1/a
set test3=$test2/b
.....................

2. SyncTest.pl中的内容:
#!/usr/bin/perl
print $ENV{"test3"};#从环境变量中取得test3值

3.foo.csh内容:
source common.csh
perl SyncTest.pl
4.运行foo.csh,却不输出结果,该如何做?谢谢


[Copy to clipboard] [ - ]
CODE:
redicaps@computer$ a=2
redicaps@computer$ export a
redicaps@computer$ perl -e 'print $ENV{a},"\n"'
2

export 它们
export 命令是用来把一个变量设成环境变量,而我这里是一个文件common.csh里面有很多变量,用export不可取。。


QUOTE:
原帖由 yinsou 于 2007-11-26 22:51 发表
export 命令是用来把一个变量设成环境变量,而我这里是一个文件common.csh里面有很多变量,用export不可取。。

先用最麻烦的实现,再谈可行不可行.最起码有个改正的方向.