say join ' ', map sprintf('%-3d', $_), 1, 2, 2;