Select Code to Download

<h4 class="bla">July 12</h4>
<p>Tim</p>
...
<h4 class="date">July 14</h4>
<p>Kami</p>
<p>Darryl</p>

[
  {
...
    'July 14' => [ 'Kami', 'Darryl' ]
  },
]

my $names = scraper {
  process '//h4[@class="bla" and . = "July 12"]', 'dates[]' => scraper
+ {
    process 'p', 'name' => 'TEXT';
  };
}

use strict;
use warnings;
...

my $res = $names->scrape( $sample );
print Dumper $res;

$VAR1 = {
          'dates' => [
                       {}
                     ]
        };