Select Code to Download

<table>
  <tr>
    <td>Foo</td>
  </tr>
</table>

use 5.010;
use PerlX::MethodCallWithBlock;
...
    -> map { $_->textContent };

say $headings[0];