String Perl

printf("%-15s%-20s\n", "Jack", "Sprat");