从表中读取数据到散列

-5

enter image description here 从表中读取数据到散列

我想从表中读取数据转换为散列，然后将数值和价格拆分成数组。例如：然后，我想用用户输入过滤添加价格。如果用户选择附属品然后我想读的配件，是001的值，然后得到的001的价格是10

所有的编码是Perl

完成感激，如果有人给我一些想法。

感谢

来源

2012-03-13 jbcedge

您已清楚解释你想要什么，它听起来微不足道。你尝试过什么不起作用？什么导致你的问题？ – John3136 2012-03-13 02:19:10

请不要投我的问题... iam学习perl ...我想会从这里得到一些想法... – jbcedge 2012-03-13 09:08:00

我不认为我投你一票。我很乐意帮助人们学习，但你没有给出任何自己尝试过任何东西的迹象。正如我所说的，即使没有在答案中提到的TableContentParser，在“原始perl”中执行它似乎也是一件相当微不足道的事情。 – John3136 2012-03-13 11:36:18

检查：http://www.perl.com/pub/2003/09/17/perlcookbook.html

“从CPAN使用HTML :: TableContentParser模块：

use HTML::TableContentParser; 

$tcp = HTML::TableContentParser->new; 
$tables = $tcp->parse($HTML); 

foreach $table (@$tables) { 
    @headers = map { $_->{data} } @{ $table->{headers} }; 
    # attributes of table tag available as keys in hash 
    $table_width = $table->{width}; 

    foreach $row (@{ $tables->{rows} }) { 
    # attributes of tr tag available as keys in hash 
    foreach $col (@{ $row->{cols} }) { 
     # attributes of td tag available as keys in hash 
     $data = $col->{data}; 
    } 
    } 
}

”

来源

2012-03-13 07:29:09 user1126070

从表中读取数据到散列

回答

相关问题