"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 really botching this up... I got so confused here I put your code
into the wrong script entirely. Once inserted where it belongs in
/cgi-bin/lib/Database.pm, when I run the calling script at:
/cgi-bin/gen_images I get output different by a couple lines and those
lines still don't tell much about what is supposed to be in $self.
==========
Error output:
root # ./gen_images
Use of uninitialized value in split at ./gen_images line 39.
Output path is '/var/www/locahost/htdocs/photo/data/'
$VAR1 = bless( {
'is_reversed' => 0,
'file' => undef
}, 'Database' );
Use of uninitialized value in open at lib/Database.pm line 219.
Use of uninitialized value in concatenation (.) or string at lib/Database.pm
line 219.
Cannot read database : No such file or directory at lib/Database.pm line 219.
=========== End Error output
The Dumper code you supplied cause the $VAR1 section.
>> I'm not making any sense of this.
This still holds and to your comments about the difficulty of OOP
perl, it is definitely well above my skill level and this is not the
best way to undertake learning it.
However, I believe in this case it isn't really required to learn so
much OOP as just to understand what this script is expecting to find
and where. I'm guess there are only small adjustments needed since I
know something close to this very code is running on a server at
http://bloodgate.com/perl/art.html
And the package I have is offered as a working product... so again
guessing the author has gotten most of it right and I'm doing small
things wrong.
I'm having no luck whatever contacting the author, hence my posts
here.
I really need to get a nice gallery type setup running for my work
with video and still pics to exchange and share source pics and
images.
The one running at the above address is very much like what I need.
If you are still interested enough to look at a few more files I have
posted the whole setup here with only a change in the name /cgi-bin/
http://home.jtan.com/~reader/mycgi-bin/
There you can see /mycgi-bin/gen_images which is the script that is
failing and its call to /mycgi-bin/lib/Database.pm where the line:
$self->_read_file($self->{file});
was taken from.
It may not be the most convenient presentation but the files are there
to view. What I'm looking for is some guidance on what this setup
expects to find and where.
I've included the INSTALL file from the distro too, which explains
some of it.
[...]
> Bad idea. Most OSes do the right thing without this. You will only want
> to turn this on for a socket or a pipe, and only if the software on the
> other side reads a character at a time and responds instantly to a
> single character. See `perldoc perlvar` and search for
> '$OUTPUT_AUTOFLUSH`
>
Point taken and prointer appreciated
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
<http://learn.perl.org/> <http://learn.perl.org/first-response>
