#!/usr/bin/perl

undef $/;

$configfile=<>;

$configfile =~ s/#.*$//gm;
$configfile =~ s/\n+/\n/g;

$configfile =~ s/^define command{\n\s*command_name\s+(\S+)\s*\n\s*command_line\s+([^\n]+)\s*\n\s*}/dn: cn=$1,ou=commands,ou=nagios,ou=tools,dc=ircam,dc=fr\nobjectClass: top\nobjectClass: nagiosCommand\ncn: $1\ncommand: $2\n/gm;

print $configfile;