freebie:~ 604> perl -le '$a="abc"x3;for $w (10, 15, 20) { printf "|%-${w}s|\n", $a }' |abcabcabc | |abcabcabc | |abcabcabc |