簡単な Perl の質問です。うまくいけば簡単な答えが得られます。非改行スペース ( ) を含む文字列で分割を実行しようとしています 。これは、必要な文字列htmlを使用してページを読み込んだ後です。HTML::TreeBuilder::XPath$titleString = $tree->findvalue('/html/head/title')
use HTML::TreeBuilder::XPath;
$tree = HTML::TreeBuilder::XPath->new;
$tree->parse_file( "filename" );
$titleString = $tree->findvalue('/html/head/title');
print "$titleString\n";
以下に元の文字列を貼り付け、その下に印刷される文字列を貼り付けます。
Mr Dan Perkins (Active)
Mr?Dan Perkins?(Active)
どちらも機能していませんが、元のと分割$titleStringしてみました。私の推測では、どこかに追加する単純なエンコード コードがあるのでしょうか?@parts = split('\?',$titleString);nbsp
HTML コード:
<html>
<head>
<title>Dan Perkins (Active)</title>
</head>
</html>