use Mojo::DOM;
use Mojo::Collection;
use Data::Dump qw(dump);
undef $/;
my $dom = Mojo::DOM->new(<DATA>);

my $ich_spreche;

my @details = $dom->find('strong')->each( sub {
    if ($_->find('strong')->first =~ /Sprachen:/) {
    $ich_spreche = $_;
           }
	});
	
say $ich_spreche;
	
__DATA__
<strong>Sprachen:</strong><br>Deutsch, Englisch (Fließend), Französisch (Konversation)<br>