text_after a certain h4

gistfile1.pl

#!/usr/bin/env perl

use strict;
use warnings;
use v5.10;

use Mojo::DOM;
my $dom = Mojo::DOM->new( <<'HTML' );
<div class="txt-block">
<h4 class="inline">Opening Weekend:</h4>
€2,137,456
(Italy)
(15 April 2012)
(420 Screens)

</div>

<div class="txt-block">
<h4 class="inline">Second Weekend:</h4>
€1,000,000
(Italy)
(22 April 2012)
(420 Screens)

</div>
HTML

say for $dom->find('div.txt-block h4.inline')
            ->grep(sub{$_->text eq 'Opening Weekend:'})
            ->pluck('text_after')
            ->each;