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} = $args->{file};
> $self->{is_reversed} = $args->{reversed} ? 1 : 0;
> if (defined $args->{views})
> $self->{viewfile} = $args->{views};
> $self->{lockfile} = $args->{lockfile};
> if (ref($args->{inc}) eq 'ARRAY')
> $self->update_counters( @{$args->{inc}} );
> $self->{sortmethod} = $args->{sort} || 'id';
>
> Still no evidence what ever of what any of these values contain or
> what they should contain. Just more heiroglyphis and undecipherable
> baloney.
>
> Is there no way to make this code spit out some real traceable values
> in something close to english?
Sorry, no. Data::Dumper is the closes, unless you want to try the Perl
debugger.
--
__END__
Just my 0.00000002 million dollars worth,
--- Shawn
"For the things we have to learn before we can do them, we learn by doing them."
Aristotle
* Perl tutorials at http://perlmonks.org/?node=Tutorials
* A searchable perldoc is at http://perldoc.perl.org/
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
<http://learn.perl.org/> <http://learn.perl.org/first-response>
