What did you try? Is there a rule for where to insert new lines? It's a fairly trivial operation using regular expressions. For example, inserting new lines before semicolons could be done with

#!/usr/bin/perl
use warnings;
use strict;

my $text = <<EOT;
xxx ; xxx { xxx }
xxx ( xxx ; xxx'
EOT

$text =~ s/(?=;)/\n/g;

print $text;
[download]