Select Code to Download

perl -pi.bak -e 's/--\n/\n/' inconsitent.txt

my @recs;
my $data = '';
...
    }
}
print "$_\n\n\n" for @recs;