私は単なる趣味の Perl プログラマーであり、pQuery を学習し、プロセスを支援するためにローカルの HTML ファイルを使用しています。これが私がこれまでに持っているものです:
use strict;
use warnings;
use pQuery;
my $filename = 'learn.html';
my $file = pQuery($filename);
my $metadesc = pQuery("meta", $file)->eq(2);
my $title = $file->find('title');
my $h1 = $file->find('h1')->find('a');
my $h2 = $file->find('h2')->eq(0);
$title->html('New Title');
$h1->html('New Heading');
$h2->html('New Sub-Heading');
しかし、ちょっとした壁にぶち当たり、次に何をすればいいのか全くわかりません。私がしたいこと:
- $metadesc の「Content」属性を変更します。
- $h2; の直後の div 内に ap を追加します。