Re: lost in perl

2003-02-04 Thread Angus Leeming
On Tuesday 04 February 2003 10:28 pm, Kayvan A. Sylvan wrote: > > (Incidentally, why do I have to copy $fileobject->lookAheadToken to a > > temporary to print '(' rather than ' > > 'Text::TeX::OpenFile=HASH(0x8333a80)->lookAheadToken') > > $fileobject is reference to a Text::TeX::OpenFile objec

Re: lost in perl

2003-02-04 Thread Kayvan A. Sylvan
On Tue, Feb 04, 2003 at 10:05:00PM +, Angus Leeming wrote: > On Tuesday 04 February 2003 9:36 pm, Kayvan A. Sylvan wrote: > > > Thanks Kayvan > > > > You're welcome. ``perldoc -f'' is extremely useful. Especially when I don't > > feel like going through the entire perlfunc documentation. > > S

Re: lost in perl

2003-02-04 Thread Angus Leeming
On Tuesday 04 February 2003 9:36 pm, Kayvan A. Sylvan wrote: > > Thanks Kayvan > > You're welcome. ``perldoc -f'' is extremely useful. Especially when I don't > feel like going through the entire perlfunc documentation. Since you're on line, can I avail myself of your expertise? I'm trying to deb

Re: lost in perl

2003-02-04 Thread Kayvan A. Sylvan
> Thanks Kayvan You're welcome. ``perldoc -f'' is extremely useful. Especially when I don't feel like going through the entire perlfunc documentation. -- Kayvan A. Sylvan | Proud husband of | Father to my kids: Sylvan Associates, Inc. | Laura Isabella Sylvan | Katherine Yelena

Re: lost in perl

2003-02-04 Thread Angus Leeming
Kayvan A. Sylvan wrote: > On Tue, Feb 04, 2003 at 10:25:22AM +, Angus Leeming wrote: >> >> Since then, I see Amir uses a function ref(...). Is this equivalent to >> \@{...} ? > > [kayvan@satyr ~]$ perldoc -f ref >ref EXPR > >ref Returns a true value if EXPR is a referenc

Re: lost in perl

2003-02-04 Thread Kayvan A. Sylvan
On Tue, Feb 04, 2003 at 10:25:22AM +, Angus Leeming wrote: > > Since then, I see Amir uses a function ref(...). Is this equivalent to > \@{...} ? [kayvan@satyr ~]$ perldoc -f ref ref EXPR ref Returns a true value if EXPR is a reference, false otherwise. If

Re: lost in perl

2003-02-04 Thread Angus Leeming
John Weiss wrote: Wow! Long time, no hear! Good to have you back. >> Can someone explain this piece of perl to me in English >> $i++ while ${$row->{"cells"}} [$i]->{"multicolumn"} eq "part"; > John Levon explained it fairly well, but I'd like to add a few > remarks. > 1. The Perl expressi

Re: lost in perl

2003-02-03 Thread John Weiss
On Sun, Feb 02, 2003 at 10:23:53PM +, Angus Leeming wrote: > Can someone explain this piece of perl to me in English > $i++ while ${$row->{"cells"}} [$i]->{"multicolumn"} eq "part"; > I've got as far as: increment $i by one whilst (expression) is true where > expression is ${$row->{"cel

Re: lost in perl

2003-02-02 Thread Michael A. Koziarksi
> while ($i < @{$acells} && ${$acells}[$i]->{"multicolumn"} eq "part") { >$i++; > } > > Doesn't cure the bug itself, but I guess that that would be too much to > ask > for ;-) > Chances are, some member of $acells, hasn't had {"multicolumn"} set. Try while ($i < @{$acell

Re: lost in perl

2003-02-02 Thread Angus Leeming
On Sunday 02 February 2003 10:35 pm, John Levon wrote: > On Sun, Feb 02, 2003 at 10:23:53PM +, Angus Leeming wrote: > > Can someone explain this piece of perl to me in English > > $i++ while ${$row->{"cells"}} [$i]->{"multicolumn"} eq "part"; > > I've got as far as: increment $i by one

Re: lost in perl

2003-02-02 Thread John Levon
On Sun, Feb 02, 2003 at 10:35:43PM +, John Levon wrote: > while (the_row.cells[i].multicolumn = "part") == obviously john

Re: lost in perl

2003-02-02 Thread John Levon
On Sun, Feb 02, 2003 at 10:23:53PM +, Angus Leeming wrote: > Can someone explain this piece of perl to me in English > $i++ while ${$row->{"cells"}} [$i]->{"multicolumn"} eq "part"; > I've got as far as: increment $i by one whilst (expression) is true where > expression is ${$row->{"ce

lost in perl

2003-02-02 Thread Angus Leeming
Can someone explain this piece of perl to me in English $i++ while ${$row->{"cells"}} [$i]->{"multicolumn"} eq "part"; I've got as far as: increment $i by one whilst (expression) is true where expression is ${$row->{"cells"}} [$i]->{"multicolumn"} eq "part"; Therafter, I go pop ;-) -- An