-1

我有以下 xml::twig

my $t = XML::Twig->new(
twig_handlers => {

 r => sub {   #my code here}            

 );
$t->parse( <>); #I want here to read multiple files as input and parse them but get an error ,

可以用 xml::twig 做到这一点吗?

4

2 回答 2

2

XML::Twig::parse方法采用单个标量参数,而不是列表,因此parse(<>)是错误的方法。

但是关于

$t->parse(  join "", <>  )

?

于 2011-09-10T20:13:22.767 回答
-1

我不认为这是可能的。来自perldoc perlvar

ARGV

在@ARGV 中迭代命令行文件名的特殊文件句柄。通常写为角度运算符“<>”中的空文件句柄。注意,目前“ARGV”只在“<>”操作符内有它的神奇效果;在其他地方,它只是一个普通文件句柄,对应于“<>”打开的最后一个文件。特别是,将“*ARGV”作为参数传递给需要文件句柄的函数可能不会导致您的函数自动读取@ARGV 中所有文件的内容。

于 2011-09-10T18:29:22.457 回答