服务器 Gind.cn
  1. 服务器 Gind.cn
  3. 如何parsing属性值的ldif导出
Intereting Posts
当我使用CIFS在Linux上安装Windows共享时，我的密码是否被encryption发送？ 如何做一个临时的电子邮件服务 OpenVPN每个用户的规则，而不是路由互联网stream量 用于HTTPstream媒体的Adobe Media Servernetworking位置 以任何方式为现有对象启用Amazon S3版本？ 如何使用非GoDaddy DNS将GoDaddy电子邮件转发到Gmail Mysql服务器Windows XP防火墙端口 麻烦在服务器上传m4a文件。 只能通过ftp访问而不能访问http，而其他文件则可以通过http访问 VirtualPC Trac设备 如何为Nginx和Varnish设置ipv6 为什么openSUSE Linux不通过它的软件库升级自己？ 可以在X窗口的一个屏幕上放置两个工作区？ PHP的问题/服务器不稳定 IIS 8，webdav和windows文件共享 使用lihgttpd使用单个端口处理http和https请求

如何parsing属性值的ldif导出

我有一个ldif导出，我想要构build一个输出文件，每个ldif条目一行; 一行按特定顺序包含各种属性值。

因此，这些命令应该parsing每个以dn：属性开头的ldif条目，并评估各种属性，提取它们的值，然后将分隔线打印到输出文件（例如，uid | cn | sn | givenName | building | title | – 喜欢这个）。

Linux命令或perl将工作，感谢您的想法。

使用现有模块编写Perl脚本来parsingLDIF（例如Net :: LDAP :: LDIF ）并根据需要进行打印。

例： 

use 5.012; use Net::LDAP::LDIF; my $ldif = Net::LDAP::LDIF->new( "file.ldif", "r", onerror => 'undef' ); while ( not $ldif->eof ) { my $entry = $ldif->read_entry; if ( $ldif->error ) { say "Error msg: ", $ldif->error; say "Error lines:\n", $ldif->error_lines ( ); } say(join('|', $entry->get_value('uid'), $entry->get_value('cn'), $entry->get_value('sn') )); } $ldif->done;