4 ms·perl -E 'say " " x (`tput cols`/2 - $_) . "*" x ++$i and $i++ for 1..shift' 25by weare138 10mo agoperl -E 'say " " x (`tput cols`/2 - $_) . "*" x ++$i and $i++ for 1..shift' 25