for my $value (@text[11, 12, 14, 15, 19]) {
    if ($bHash{ $text[3] } eq $value) {
        $bHash{ $text[0] } = $value;
        last;
    }
}