in reply to asterisk pattern

say' 'x(3-$_),'*'x$_ for 1..3,2,1

Replies are listed 'Best First'.
A reply falls below the community's threshold of quality. You may see it by logging in.

In Section Seekers of Perl Wisdom