Still looking for help on installing this in version 5.38c.
I do not have the line chomp($checkit[7]);
but what I have is:
if ($checkit[6] =~ /N/) {
$AddN = "N";
} else {
$AddN = "";
}
if ($checkit[1] eq "$threadnum") {
if ($openclose eq "open") {
$checkit[6] = "$AddN";
} else {
$checkit[6] = "X$AddN";
}
$newline = join("|^|", @checkit);
push(@theupdatedts, $newline);
} else {
push(@theupdatedts, $checkthis);
}
} # end foreach @threadsum
Could someone help with this?
hunter