Does anyone know how to make a Perl program that generates a check.?

The program ask the user for the information below. The user data is assined to the scalar and array variables.





Check Number ($chkno)


First Name ($first)


Last Name ($last)


A two line Address, stored in array (@addr)


Phone Number ($phone)


Date ($date)


Payee ($payee)


Check Amount ($amount)


Check Purpose ($memo)





In the format below.


+-------------------------------------...


|........................................ No....$chkno...|


|..$first......................$last..... |


|..$addr[0],,(Space to +)|


|..$addr[1]..(Space to +)|


|..$phone..(space to line aligns)..$date....|


|..(space to +)..|


| Pay to the..(space to +)..|


| Order of:.....................$payee............. $amount |


|..(space to +)..|


| For: $memo........................ Stamped Signature |


| (space to +) |


+-------------------------------------...

Does anyone know how to make a Perl program that generates a check.?
Why would you want to do this? Doing a form in perl sounds like lots of time. It has to be lined up and checked. Its just like "c". Use a printf statement.





Good luck