文字列データからある部分のみデータ取得

いつもお世話になっております。
Perlは初心者です。

例えば下記のような内容のデータから
"6月1日（木）"と　"午後6時30分～午後7時30分"
のみのデータを取得したいのですが・・

<tr valign="top">
<td class="td1">6月1日（木）</td><td class="td1">午後6時30分～午後7時30分</td>
</tr>


正規表現で簡単に表せそうなのですが、
うまく出来ません。

よろしくお願い致します。

No.1 ベストアンサー 回答者： noname#62235 回答日時： 2006/06/16 11:54

$_に１行格納されているとして、

@word = ($_ =~ />([^<]+)</g);
で、うまくいきそうな気がします。
格納されている個数は@#word、$word[0]、$word[1]・・・に中身が入ります。

この回答へのお礼

ありがとうございました。
無事出来ました。

お礼日時：2006/06/16 12:38