my $bracketend = 8 * $lines =~ s/\}\s*\}\s*\}\s*\}\s*\}<\s*\}\s*\}\s*\}$/\n\}\n\}\n\}\n\}\n\}\n\}\n\}\n\}/gms;
$bracketend += 4 * $lines =~ s/\}\s*\}\s*\}\s*\}$/\n\}\n\}\n\}\n\}/gms;
$bracketend += 2 * $lines =~ s/\}\s*\}$/\n\}\n\}/gms;
$bracketend += $lines =~ s/\}$/\n\}/gms;