请问哪个更节省系统资源?

请问哪个更节省系统资源?

请问哪个更节省系统资源?
1 以下两个程序片段。实现同样的功能。但哪个更节省系统资源?

片段一
=======================
#!/usr/bin/perl -w

use CGI qw /:standard/;

open FILE, "<bookurl.lst";

while (<FILE>) {
$_ =~ m/(.*)\t(.*)/;
$s .= "a({'-href'=>'http://$1'}, '$2'),";
}
$s =~ s/[,]?$//g;
print header('-charset'=>'gb2312'),
start_html('-title'=>'学习书签', '-lang'=>'zh-CN'),
ul(li([eval($s)])),
end_html();

close FILE;

片段二
=======================
#!/usr/bin/perl -w

use CGI qw /:standard/;
open FILE, "<bookurl.lst";

print header('-charset'=>'gb2312'),
start_html('-title'=>'学习书签', '-lang'=>'zh-CN'),
ul(li([map {$_ =~ s/(.*)\t(.*)/a({'-href'=>'http:\/\/$1'}, '$2')/; eval $_ } <FILE>])),
end_html();
close FILE;
用benchmark做一下测试啊。

节省资源就是不必考虑运行多长时间,需要最小内存和最小CPU。
你这么简单的程序那个都不.
你这么简单的程序那个都不会耗系统资源。 不要花时间考虑不该考虑的。

另外, 那个 eval 有必要么。