Re: reading Perl syntax

2006-06-06 Thread Mr. Shawn H. Corey
On Tue, 2006-06-06 at 12:14 -0500, [EMAIL PROTECTED] wrote: > I'm trying to debug a failing script. It is chock full of expressions > like this: > $self->_read_file($self->{file}) > > I have never used this syntax in my own scripts which are pretty basic > and getting a headache trying to figur

Re: reading Perl syntax

2006-06-06 Thread reader
"Mr. Shawn H. Corey" <[EMAIL PROTECTED]> writes: > use Data::Dumper; > print Dumper $self; Thanks for the pointers... I haven't read it all yet but still trying to get this script to run. It is inlined at the end. Introducing your code causes a new failure and nothing is printed. [What I'm

Re: reading Perl syntax

2006-06-06 Thread Anthony Ettinger
On 6/6/06, [EMAIL PROTECTED] <[EMAIL PROTECTED]> wrote: $self->_read_file($self->{file}) $self is an blessed reference to an object (used from inside that object) $self->_read_file() is the subroutine to call defined inside that object $self->{'file'}; is a reference to a hash defined insi

Re: reading Perl syntax

2006-06-06 Thread reader
[EMAIL PROTECTED] writes: > I'll post only one of the two cfg files being read and you'll see it > has very little in it. The documentation with this script appears to > be out of sync with actual script so hasn't been much help. I suspect > my problem revolve around miss placing parts of the pa

Re: reading Perl syntax

2006-06-06 Thread reader
"Anthony Ettinger" <[EMAIL PROTECTED]> writes: > The syntax {} is for a hashref, it's just an un-named hashref inside > that object. > > my $foo = new Foo; > print $foo->getFooKey(); > $foo->setFooKey('new value'); > print $foo->getFooKey(); Thanks for the demo... I'm in well over my head here bu

Re: reading Perl syntax

2006-06-06 Thread Anthony Ettinger
just execute it with "perl -wl foo" or add the shebang line: #!/usr/bin/perl -w On 6/6/06, [EMAIL PROTECTED] <[EMAIL PROTECTED]> wrote: "Anthony Ettinger" <[EMAIL PROTECTED]> writes: > The syntax {} is for a hashref, it's just an un-named hashref inside > that object. > > my $foo = new Foo;

Re: reading Perl syntax

2006-06-06 Thread Mr. Shawn H. Corey
On Tue, 2006-06-06 at 11:44 -0700, Anthony Ettinger wrote: > just execute it with "perl -wl foo" > > or add the shebang line: #!/usr/bin/perl -w Your script should start with: #!/usr/bin/perl use strict; use warnings; -- __END__ Just my 0.0002 million dollars worth, --- Shawn

Re: reading Perl syntax

2006-06-06 Thread reader
"Anthony Ettinger" <[EMAIL PROTECTED]> writes: > just execute it with "perl -wl foo" > or add the shebang line: #!/usr/bin/perl -w Yes, I had done that prior to posting error output The erroring script looks like: === #!/usr/local/bin/perl -w my $foo = new Foo; print $foo->getFooKey()

Re: reading Perl syntax

2006-06-06 Thread Adriano Ferreira
The line below was folded, and $self->{'fookey'} = 'some value here'; #hashref accessible only within Package Foo; the Perl interpreter is seeing within Package Foo; Outputs: Can't locate object method "within" via package "Package" (perhaps you forgot to load "Package"?) at ./myOOP

Re: reading Perl syntax

2006-06-06 Thread Mr. Shawn H. Corey
On Tue, 2006-06-06 at 13:13 -0500, [EMAIL PROTECTED] wrote: > "Mr. Shawn H. Corey" <[EMAIL PROTECTED]> writes: > > > use Data::Dumper; > > print Dumper $self; > > Thanks for the pointers... I haven't read it all yet but still trying > to get this script to run. It is inlined at the end. > >

Re: reading Perl syntax

2006-06-06 Thread Anthony Ettinger
There's a good book "PHP5 Patterns and Object Oriented Programming" which I found very instrumental in my understanding of object-oriented programming, before applying it to Perl. There are of course Perl books on the subject, and the perldocs, but I found PHP's object oriented support to be les

Re: reading Perl syntax

2006-06-06 Thread reader
"Adriano Ferreira" <[EMAIL PROTECTED]> writes: > the Perl interpreter is seeing > > within Package Foo; Gack, yes I see it now... I should have noticed that but it slid right by my unpracticed eye. -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROT

Re: reading Perl syntax

2006-06-06 Thread reader
"Mr. Shawn H. Corey" <[EMAIL PROTECTED]> writes: [...] Harry wrote: >> Introducing your code causes a new failure and nothing is printed. Shawn wrote: > The line: print Dumper $self; > should be just before the line you posted in your earlier post: > $self->_read_file($self->{file}); I'm reall

Re: reading Perl syntax

2006-06-06 Thread Mr. Shawn H. Corey
On Tue, 2006-06-06 at 19:35 -0500, [EMAIL PROTECTED] wrote: > "Mr. Shawn H. Corey" <[EMAIL PROTECTED]> writes: > > [...] > > Harry wrote: > >> Introducing your code causes a new failure and nothing is printed. > > > Shawn wrote: > > The line: print Dumper $self; > > should be just before the li

Re: reading Perl syntax

2006-06-06 Thread reader
"Mr. Shawn H. Corey" <[EMAIL PROTECTED]> writes: [...] > Yes, Dumper() calls its first variable VAR1 (it calls its second VAR2, > etc.). This tells more than you know. The line: > > 'file' => undef, > > means that somewhere in your code (or the class) that 'file' was > actually assigned a valu

Re: reading Perl syntax

2006-06-07 Thread Mr. Shawn H. Corey
On Tue, 2006-06-06 at 22:23 -0500, [EMAIL PROTECTED] wrote: > 46: $self->{file} = $args->{file}; This is the line were $self->{file} is set to undef. > 48: $self->_read_file($self->{file}); > > ** => 214: my $file = shift; And here $file is set to $self->{file}, which is undef So what is $a

RE: reading Perl syntax

2006-06-07 Thread Ron Goral
> -Original Message- > From: Mr. Shawn H. Corey [mailto:[EMAIL PROTECTED] > Sent: Wednesday, 07 June, 2006 07:16 > To: beginners@perl.org > Subject: Re: reading Perl syntax > > > On Tue, 2006-06-06 at 22:23 -0500, [EMAIL PROTECTED] wrote: > > 46: $self->

Re: reading Perl syntax

2006-06-07 Thread Tom Phoenix
On 6/7/06, Ron Goral <[EMAIL PROTECTED]> wrote: Merely referencing a key in a hash sets it into the hash, though with a value of undef. This turns out not to be the case. In Perl, merely referencing a key in a hash doesn't change the hash. Some non-Perl hash implementations do change the hash

RE: reading Perl syntax

2006-06-07 Thread Mr. Shawn H. Corey
On Wed, 2006-07-06 at 07:49 -0500, Ron Goral wrote: > Merely referencing a key in a hash sets it into the hash, though with a > value of undef. No, it does not. You have to actually assign it a value for the key to appear. The value you assign it may be undef, but Data::Dumper will only show the k

RE: reading Perl syntax

2006-06-07 Thread Ron Goral
> -Original Message- > From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] Behalf Of > Tom Phoenix > Sent: Wednesday, 07 June, 2006 08:00 > To: Ron Goral > Cc: beginners@perl.org > Subject: Re: reading Perl syntax > > > On 6/7/06, Ron Goral <[EMAIL

RE: reading Perl syntax

2006-06-07 Thread Christian, Ed
> > Merely referencing a key in a hash sets it into the hash, > though with a > > value of undef. > > This turns out not to be the case. In Perl, merely referencing a key > in a hash doesn't change the hash. Some non-Perl hash implementations > do change the hash in those circumstances, though, s

Re: reading Perl syntax

2006-06-07 Thread reader
"Mr. Shawn H. Corey" <[EMAIL PROTECTED]> writes: > perl -n -e "/\bargs\b/ && print" lib/Database.pm Well I didn't learn a thing from that either: my $args = shift; $self->{file} = $args->{file}; $self->{is_reversed} = $args->{reversed} ? 1 : 0; if (defined $args->{views}) $self->{view

Re: reading Perl syntax

2006-06-07 Thread Mr. Shawn H. Corey
On Wed, 2006-07-06 at 16:16 -0500, [EMAIL PROTECTED] wrote: > Well I didn't learn a thing from that either: > my $args = shift; This is the line you should be interested in. Could you show the subroutine it is in? Also add after it: use Data::Dumper; print Dumper $args; > $self->{file} =

Re: reading Perl syntax

2006-06-07 Thread reader
"Mr. Shawn H. Corey" <[EMAIL PROTECTED]> writes: > my $args = shift Subroutine: sub new { my $class = shift; my $self = bless {}, $class; my $args = shift; $self->{file} = $args->{file}; $self->{is_reversed} = $args->{reversed} ? 1 : 0; $self->_read_file($self->{file}); $self->{filt

Re: reading Perl syntax

2006-06-09 Thread Peter Scott
On Wed, 07 Jun 2006 09:00:12 -0400, Tom Phoenix wrote: > In Perl, merely referencing a key > in a hash doesn't change the hash. Some non-Perl hash implementations > do change the hash in those circumstances, though, so your confusion > is understandable. Not to detract from your point in this thre

Re: reading Perl syntax

2006-06-09 Thread Dr.Ruud
Peter Scott schreef: > Tom Phoenix: >> In Perl, merely referencing a key >> in a hash doesn't change the hash. Some non-Perl hash implementations >> do change the hash in those circumstances, though, so your confusion >> is understandable. > > Not to detract from your point in this thread, but jus