CSSスタイルなしで、いくつかの厄介なネストされたテーブルでWeb::Scrapeを使用します。XPATH を学ばなければならず、つまづきます。
更新:いくつかの XPATH の問題を修正しました。属性に関する質問が 1 つだけ残っています。
#!perl
use warnings;
use Web::Scraper;
use Data::Dumper;
my $html = do { local $/; <DATA> };
my $scraper = scraper {
# Wrong! The 'tbody' element does not exist.
# process ".//[@id='cfg-surface-detail']/center/table/tbody/tr/td[2]/select",
# I used Chrome to get the XPath, and it inserts tbody elements when rendering bad HTML
# also, I changed the start of the XPATH from './/' to '//*'
# which I think means "relative to anywhere" or something.
process "//*[@id='cfg-surface-detail']/center/table/tr/td[2]/select",
'sensorType[]' => 'TEXT';
};
my $res = $scraper->scrape($html);
print Dumper($res);
__DATA__
<html><head><title>...</title></head>
<body>
<form action="/foo" method=post id=cfg-surface-detail name=cfg-surface-detail>
<center>
<table bgcolor="#FFFFFF">
<tr><td>Sensor Type</td><td>
<select name="cfg-sensor-type" >
<option value="1 Fred's Sensor" selected>Fred's Sensor
<option value="2 Other">Other Sensor
</select>
</td></tr>
</table>
</center>
</form>
</body>
</html>
これにより、次のように出力されます。
$VAR1 = {
'sensorType' => [
'Fred\'s Sensor Other Sensor '
]
};
だから私は近づいています。属性<option>
を持つを指定するにはどうすればよいですか?selected
更新:解決しました。Xpathは//*[@id="cfg-surface-detail"]/center/table/tr/td[2]/select/option[@selected]
これは役に立ちました: http://www.w3schools.com/xpath/xpath_syntax.asp