NAME

Acme::Text::Rhombus - Draw a rhombus with letters/digits

SYNOPSIS

 use Acme::Text::Rhombus qw(rhombus);

 print rhombus(
     lines   =>       15,
     letter  =>      'c',
     case    =>  'upper',
     fillup  =>      '.',
     forward =>        1,
 );

 __OUTPUT__
 .......C.......
 ......DDD......
 .....EEEEE.....
 ....FFFFFFF....
 ...GGGGGGGGG...
 ..HHHHHHHHHHH..
 .IIIIIIIIIIIII.
 JJJJJJJJJJJJJJJ
 .KKKKKKKKKKKKK.
 ..LLLLLLLLLLL..
 ...MMMMMMMMM...
 ....NNNNNNN....
 .....OOOOO.....
 ......PPP......
 .......Q.......

FUNCTIONS

rhombus, rhombus_letter

Draws a rhombus with letters and returns it as a string.

If no option value is supplied or if it is invalid, then a default will be silently assumed (omitting all options will return a rhombus of 25 lines).

Given that the specified number of lines is even, it will be incremented to satisfy the requirement of being an odd number.

Options:

• lines

  Number of lines to be printed. Defaults to 25.

• letter

  Letter to start with. Defaults to a.

• case

  Lower/upper case of the letters within the rhombus. Defaults to upper.

• fillup

  The fillup character. Defaults to '.'.

• forward

  Forward letter enumeration. Defaults to boolean 1.

rhombus_digit

Draws a rhombus with digits and returns it as a string.

If no option value is supplied or if it is invalid, then a default will be silently assumed (omitting all options will return a rhombus of 25 lines).

Given that the specified number of lines is even, it will be incremented to satisfy the requirement of being an odd number.

Options:

• lines

  Number of lines to be printed. Defaults to 25.

• digit

  Digit to start with. Defaults to 0.

• fillup

  The fillup character. Defaults to '.'.

• forward

  Forward digit enumeration. Defaults to boolean 1.

rhombus_random

Draws a rhombus with random letters/digits and returns it as a string.

If no option value is supplied or if it is invalid, then a default will be silently assumed (omitting all options will return a rhombus of 25 lines).

Given that the specified number of lines is even, it will be incremented to satisfy the requirement of being an odd number.

Options:

• lines

  Number of lines to be printed. Defaults to 25.

• fillup

  The fillup character. Defaults to '.'.

EXPORT

Functions

rhombus(), rhombus_letter(), rhombus_digit(), rhombus_random() are exportable.

Tags

:all - *()

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://dev.perl.org/licenses/

cpanm Acme::Text::Rhombus

perl -MCPAN -e shell
install Acme::Text::Rhombus