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.