my @rec = split /\^/;
    next unless @rec == 5;