Select Code to Download

+--------------------------------------------------------------+ 
|                                          Check No. $chkno    | 
...
| For: $memo                         Stamped Signature         | 
|                                                              | 
+--------------------------------------------------------------+

#!/usr/bin/env perl

...

write (CHECK);