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