#!/usr/bin/perl -p
   s/^$/\n\n/
or s/^ /" " x 16/e
or do { s/^(.*?: )/"$1".(" " x (16-length($1)))/e; s/, /"\n".(" " x 16)/eg }