html - HTMLテーブルからデータを抽出するPerlスクリプト

Question

2列の単純なHTMLテーブルを解析するためのPerlスクリプトが必要です。

表には次のものが含まれます。列1ユーザーの名前、列2ユーザーがオンラインになっている時間。

次のようにデータを取得する必要があります：Name Time_online

HTML::TreeBuilderとHTML::Parserを試しましたが、結果がありません。

どういうわけか、このデータを取得して操作したいと思います。ありがとう！

<h1>Users currently online</h1>
<table class="list-table" cellpadding="3" cellspacing="1" summary="Data for online_users">
<thead>
<tr class="list-header">
<th class="list-table" id="online_users_name">
User name
</th>
<th class="list-table" align="right" id="online_users_online_time_pretty">
Online time        
</th>
    </tr>
    </thead>  

    <tbody>
              <tr class="odd"> 
              <td class="list-table" headers="online_users_name">
                <a href="Link">Jack Boauldwin</a>
              </td>

              <td class="list-table" align="right" headers="online_users_online_time_pretty">
                11 minutes
              </td>
            </tr>
        <tr class="even">  

              <td class="list-table" headers="online_users_name">
                <a href="Link">Sarah James</a>
              </td>

              <td class="list-table" align="right" headers="online_users_online_time_pretty">
                1 minutes
              </td>            
          </tr>

              <tr class="odd">


              <td class="list-table" headers="online_users_name">
                <a href="Link">Greg Brown</a>
              </td>

              <td class="list-table" align="right" headers="online_users_online_time_pretty">
                0 minutes
              </td>

          </tr>    
</tbody>
</table>

Answer 1

HTML::TableExtractを使用します。