if ( $start_char == $correct_start_char ) {
    next if $data_length != $correct_start_length;
    if ( $data_length == $correct_start_length ) {
        print CLEANFILE substr($data, 1, -2), "\n";
        $clean_file_length++;
    }
} else {
    if ( $data_length > $correct_clean_length ) {
        print CLEANFILE substr( substr($data, 0, -2), -$correct_clean_length), "\n";
        $clean_file_length++;
    } elsif ( $data_length == $typed_length ) {
        print CLEANFILE $data;
        $clean_file_length++;
    }
}