Namazu-users-ja(旧)

[togashi@xxxxxxxxxxxxx]

2001/03/05 15:02:03 +0900にtogashi@xxxxxxxxxxxxxさんに頂いた
「[namazu-users-ja] Re: Forward: Re:  Re: 著者に META タグの Authorを表示したい」への返事です。
>>廣瀬と申します。
>>> <META NAME="AUTHOR" CONTENT="ここを切り出し">　　の”ここを切り出し”の
>>> 部分のみ$fields->{'author'} に代入したいのですが。
>>
>>以下の部分を
>>     if ($$contref =~ m!<LINK\s[^>]*?HREF=([\"\'])mailto:(.*?)\1\s*>!i) { #"
>>このようにすればいいのではないでしょうか。  
>>     if ($$contref =~ m!<META\sNAME=([\"\'])AUTHOR\1\s[^>]*?CONTENT=\1(.*?)\1\s*>!i) { #"
>>----
とがちゃん＠日立何の気です、さっそく今夜試してみました。
ばっちりでした
本当に廣瀬さん、そして皆さんありがとうございます感謝します。
早くPerlが書けるようになりたい (^^)