NAME
Acme::Text::Rhombus - Draw an alphanumerical rhombus
SYNOPSIS
use Acme::Text::Rhombus qw(rhombus);
print rhombus(
lines => 31,
letter => 'c',
case => 'upper',
fillup => '+',
);
__OUTPUT__
++++++C++++++
+++++DDD+++++
++++EEEEE++++
+++FFFFFFF+++
++GGGGGGGGG++
+HHHHHHHHHHH+
IIIIIIIIIIIII
+JJJJJJJJJJJ+
++KKKKKKKKK++
+++LLLLLLL+++
++++MMMMM++++
+++++NNN+++++
++++++O++++++
FUNCTIONS
rhombus
Draws an alphanumerical rhombus and returns it as string. Omitting options will return a rhombus of 25 lines.
Options:
lines
Amount of lines to be printed.
letter
Alphanumerical letter to start with.
case
Lower/upper case of the letters within the rhombus.
fillup
The fillup character.
AUTHOR
Steven Schubiger <schubiger@cpan.org>
LICENSE
This program is free software; you may redistribute it and/or modify it under the same terms as Perl itself.