Re: Formats for invoices.

On Thu, 2007-06-28 at 17:24 -0700, Tom Phoenix wrote: > On 6/28/07, Francisco Valladolid <[EMAIL PROTECTED]> wrote: > > > 1.- How can put lines containing products descriptions ? > > 2.- Ho can justify or align a variable into format ? > > Have you seen the perlform manpage? > > http://perl

Re: Formats for invoices.

On 6/28/07, Tom Phoenix <[EMAIL PROTECTED]> wrote: On 6/28/07, Francisco Valladolid <[EMAIL PROTECTED]> wrote: > 1.- How can put lines containing products descriptions ? > 2.- Ho can justify or align a variable into format ? Have you seen the perlform manpage? http://perldoc.perl.org/perlf

Re: Formats for invoices.

On 6/28/07, Francisco Valladolid <[EMAIL PROTECTED]> wrote: 1.- How can put lines containing products descriptions ? 2.- Ho can justify or align a variable into format ? Have you seen the perlform manpage? http://perldoc.perl.org/perlform.html Hope this helps! --Tom Phoenix Stonehenge Pe

Re: formats and write()

Dani Pardo wrote: > > Hi, I've a question involving formats. > I have a text file that has lines like this: > > __LINE1__ > __LINE2__ > > I use s/__LINE(\d+)__/$line{$1}/ to change each of these lines by an > scalar that is stored in a hash, i.e: > > line{1}="CUSTOMER_NAME | PHONE

Re: formats

On Dec 5, 2003, at 6:39 PM, Jose Malacara wrote: [..] write TYPE_1; that's the sticky bit, where tom is talking about not writing to a filehandle... [..] To expand on tom's comments a bit: which generates Type: type1Ga

RE: formats

To just use it for STDOUT, it's pretty straight forward, switching the special $~ variable as needed. You're switching FORMATs not filehandles. There may be a shortcut but this is how I would do it for this problem: -Tom Kinzer _ format TYPE_1 = Im formated with type1: @<<<

RE: Formats

Please disregard, after a day of hair-pulling and hacking I managed to figure it out. Dave C. -Original Message- From: Dave Chappell [mailto:[EMAIL PROTECTED]] Sent: Tuesday, December 10, 2002 11:52 AM To: [EMAIL PROTECTED] Subject: Formats Attached is one of a few (work in progre

RE: Formats, cont'd

Maybe one of the guru's can help us, but here is one way: #!perl -w use strict; my @a1 = ();# leaving out $a1[1] so undefined and can use the check of undefined in loop $a1[0] = 1; $a1[2] = 3; $a1[3] = 4; $a1[4] = 5; $a1[5] = 6; my @b1 = (2,3,4,5,6,7); my $Mya1; my $Myb1; my $My

RE: Formats

thanks a lot! -Original Message- From: Jeff 'japhy' Pinyan [mailto:[EMAIL PROTECTED]] Sent: Friday, February 01, 2002 1:19 PM To: [EMAIL PROTECTED] Cc: [EMAIL PROTECTED] Subject: Re: Formats On Feb 1, [EMAIL PROTECTED] said: >Why does the following not work for me? &

Re: Formats

On Feb 1, [EMAIL PROTECTED] said: >Why does the following not work for me? > >format NAME = >TEST > >@<<< >$test >.. > >$test = "asdfjkl;"; > >select(NAME); >write(); That tries writing to the filehandle NAME, too. Instead of select(NAME), do: $~ = "NAME"; That will set ST