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

質問

いつもお世話になっております。
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 · ベストアンサー

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

お礼

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