Perl能否读取文件时直接代入perl变量

mtvv

回复 1# orlye

gaojun927

回复 1# orlye

用eval比如：tt.txt里是my name is $name my id is $id
perl里是
$name='gao';
$id='1';
open FH, "tt.txt";
while(<FH>){
$input.=$_;
}
eval("print \"$input\";");

orlye

回复  orlye

用eval比如：tt.txt里是my name is $name my id is $id
perl里是
$name='gao';
$id='1' ...
gaojun927 发表于 2013-2-25 14:47

                               
登录/注册后可看大图

多谢高人指点！学习了！

sjtusonic

回复 12# gaojun927


    这个用法好！代码也很简洁

射门靴

回复  orlye

用eval比如：tt.txt里是my name is $name my id is $id
perl里是
$name='gao';
$id='1' ...
gaojun927 发表于 2013-2-25 14:47

                               
登录/注册后可看大图

   这个好,学习了!