次の html があります。情報を抽出し、それらをテーブルのようなデータベースに再形成したいと考えています。
<tr some parameters here>
<td more parameters here></div>
<div even more para>Var1</td>
<td params>observation 1</td>
<td params></td>
</tr>
<tr some parameters here>
<td more parameters here></div>
<div even more para>Var2</td>
<td params>observation 2</td>
<td params></td>
</tr>
var3 obs 3、var4 obs4 についても同様です。
Mojo::DOM次の高度に構造化されたコードを使用するように勧められました。
#!/usr/bin/perl
use warnings;
use strict;
use Data::Dumper;
use lib './lib/lib/perl64';
use Mojo::DOM;
my $html = q(
<html>
<head><title>Some list</title>
</head>
<body>
<div>
<table>
<tr>
<td>Var1</td>
<td>Obs1</td>
</tr>
<tr>
<td>var2</td>
<td>obs2</td>
</table>
</div>
</body>
</html>
);
my $dom = Mojo::DOM->new($html);
my $table = $dom->at('table');
for my $record ($table->children('tr')->each) {
my %record = map { $_->text } $record->children('td')->each;
print Dumper(\%record), "\n";
}
私はプログラミングを知らないと仮定してください。そして、私の場合に使用できるようにコードを調整するにはどうすればよいですか? 私には、それが実行可能なスクリプトになるにはまだかなり遠いようです。事前にあなたの助けとthxに本当に感謝しています。
よろしく、sh