$/ = ''; while (<>) { if (/dn:/ ... /\n\n/) {# begin and end of a LDIF entry print $_ . "\n" if (/dn:: /); # our simple search crit +eria and action. } } [download]
In reply to Ldif Parser template by j.moratilla