in reply to Re^2: Diamonds for fun
in thread Diamonds for fun
Combining with other posts here, golf:55
perl -E'$_=pop;sub r{1..$_,reverse 1..$_-1}say$"x(9-$_),r for r' 9Enjoy, Have FUN! H.Merijn
In Section
Cool Uses for Perl
in reply to Re^2: Diamonds for fun
in thread Diamonds for fun
Combining with other posts here, golf:55
perl -E'$_=pop;sub r{1..$_,reverse 1..$_-1}say$"x(9-$_),r for r' 9