root@ANON:/var/www/auth_required # perl -we'my $test = join(" & ", map { sprintf "%-8s (x%s)", "$_\n"} qw/foo bar baz/)'
Newline in left-justified string for sprintf at -e line 1.
Use of uninitialized value in sprintf at -e line 1.
Newline in left-justified string for sprintf at -e line 1.
Use of uninitialized value in sprintf at -e line 1.
Newline in left-justified string for sprintf at -e line 1.
Use of uninitialized value in sprintf at -e line 1.