perl -e '$a = "foobar"; printf("#%16s#\n", $a);'