#!perl -lw
die unless defined($_=<>);
die unless /package\.conf\.d$/;
$emptycount=0;
while(<>){
    chomp;
    if(/^\s*$/){
        $emptycount++;
        next;
    }
    die unless /^\s/;
    s/^\s+//;
    print;
    if(/^\((\S+)\)$/) { #hidden
        $_=$1;
    }
    die "ERROR '$_'" unless /^(\S+-[0-9.]+)$/;
}
die unless $emptycount==1;# at the end of the file
