Comments on: Concatenating lines in ldapsearch results

By: sbutler

sbutler — Tue, 28 Jul 2009 20:25:41 +0000

I was having a problem with this script. It doesn't handle the situation where the continuation line contains spaces. Here's a better version:

$cnt=0;
while ($line = <>) {
chomp($line);
if ( $line =~ /^authpassword/ ) {
next;
} elsif ( $line =~ /^S+/) { ### this line is a "normal" or starting line
$results[$cnt++] = $line;
} elsif ( $line =~ /^$/ ) { ### this line is blank
$results[$cnt++] = "";
} elsif ( $line =~ /^s+(S.*)/ ) { ### this line is a continuation
$results[$cnt-1] = $results[$cnt-1] . $1;
}
}

for $i (0 .. $cnt) {
print "$results[$i]n";
}

By: Dan Norris

Dan Norris — Wed, 15 Apr 2009 22:07:27 +0000

Glad it was helpful. Thanks for stopping by!

Please excuse my typos, I sent this from my iPhone.

By: J. Ayme

J. Ayme — Wed, 15 Apr 2009 14:03:37 +0000

So usefull !!!

I got this issue with dipassistant boostrap (line breaks) and incorrect changetype attribute

Thanks Dan !

By: Dan Norris

Dan Norris — Mon, 13 Oct 2008 10:54:55 +0000

Thanks! …and thanks for stopping by!

By: Simon Haslam

Simon Haslam — Sun, 12 Oct 2008 13:46:26 +0000

Very handy Dan. It hadn't actually occurred to me that you could always use Perl from the Oracle home before – I do often find myself having to do some sort of “munging” across multiple lines and Perl is probably the easiest tool for the job.