if ($fields[2] eq $wanted_type) {
        if (! exists $data_capture{$fields[0]}) {
            $data_capture{$fields[0]} = [];
        }
        push @{$data_capture{$fields[0]}}, $fields[3];
    }