Ing. Branislav Gerzo [IBG], on Tuesday, November 29, 2005 at 17:14
(+0100) wrote:
IBG> And I'd like to print:
IBG> | Name............: Branislav |
IBG> | Surname.........: Gerzo |
IBG> 26.^ 80.^
Nothing is tricky, if man want. So:
sub formie {
print form
'| {<<<<<<<<<<<<<<}: {[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[}
|',
{rfill=>'.'}, shift, {rfill=>' '}, shift;
}
--
...m8s, cu l8r, Brano.
[Don't bother with the shrimp baby, daddy's comin' home with the crabs!]
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
<http://learn.perl.org/> <http://learn.perl.org/first-response>