you need to use qw(qq($a $b)) , but qw can not work with qq :D 2009/9/16 Michael Zeng <[email protected]>
> catfile 不是接受数组元素么 > > 按理 qw/ a b / = ( "a" , "b") 啊 > > > > > 2009/9/16 cnhack TNT <[email protected]> > > qw// 本身就没那个功能，你得用 qq//; >> >> 2009/9/16 Michael Zeng <[email protected]> >> >> 怎么感觉catfile 接受参数数别挑剔？， 下面几种 都有点问题： >>> >>> #!/usr/bin/perl >>> >>> use strict ; >>> use warnings ; >>> >>> use File::Spec ; >>> >>> >>> my $a = 'ccc' ; >>> my $b = 'ddd' ; >>> print File::Spec -> catfile ( qw/ $a $b / ) ; # 得到 $a/$b : my god >>> , 为什么不变量替换呢？ >>> >>> 编译失败： >>> print File::Spec -> catfile ( $a , $b_2 ) ; >>> >>> 编译失败： >>> print File::Spec -> catfile ( $a , ${b}_2 ) ; >>> >>> 只有这一种是对的： >>> print File::Spec -> catfile ( $a , $b ) ; 但是没法对 $a , $b进行微操作， >>> >>> 感觉catfile 只支持 , 分割参数，而且不能带一些变量变化，真是太弱了吧？ >>> >>> >>> perl 5.10 和5.8 都这样，win32 或unix , >>> >>> >>> >>> -- >>> Yours Sincerely >>> Zeng Hong >>> >>> >>> >> >> > > > -- > Yours Sincerely > Zeng Hong > > > > --~--~---------~--~----~------------~-------~--~----~ 您收到此信息是由于您订阅了 Google 论坛“PerlChina Mongers 讨论组”论坛。 要在此论坛发帖，请发电子邮件到 [email protected] 要退订此论坛，请发邮件至 [email protected] 更多选项，请通过 http://groups.google.com/group/perlchina?hl=zh-CN 访问该论坛 -~----------~----~----~----~------~----~------~--~---
