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>


Reply via email to