#!perl -nlw
use FileHandle;
BEGIN{
    STDOUT->autoflush(1);
}
#merges the description into 1 line for easier grepping
if(/^[0-9.]+:  description\s*:\s*$/i){
    $suppress=1;
    $x=$_;
    next;
}
if($suppress){
    if(/^[0-9.]+:   \s*(.*)/){
        $x.=" $1";
    } else {
        print$x;
        $suppress=0;
    }
}
print unless $suppress;
