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.

See http://www.perl.com/perl/misc/Artistic.html