Return-Path: Delivered-To: apmail-perl-modperl-archive@www.apache.org Received: (qmail 52882 invoked from network); 15 Oct 2006 16:28:04 -0000 Received: from hermes.apache.org (HELO mail.apache.org) (209.237.227.199) by minotaur.apache.org with SMTP; 15 Oct 2006 16:28:04 -0000 Received: (qmail 33614 invoked by uid 500); 15 Oct 2006 16:27:55 -0000 Delivered-To: apmail-perl-modperl-archive@perl.apache.org Received: (qmail 33598 invoked by uid 500); 15 Oct 2006 16:27:54 -0000 Mailing-List: contact modperl-help@perl.apache.org; run by ezmlm Precedence: bulk list-help: list-unsubscribe: List-Post: List-Id: Delivered-To: mailing list modperl@perl.apache.org Received: (qmail 33587 invoked by uid 99); 15 Oct 2006 16:27:54 -0000 Received: from asf.osuosl.org (HELO asf.osuosl.org) (140.211.166.49) by apache.org (qpsmtpd/0.29) with ESMTP; Sun, 15 Oct 2006 09:27:54 -0700 X-ASF-Spam-Status: No, hits=3.9 required=10.0 tests=DNS_FROM_RFC_ABUSE,DNS_FROM_RFC_POST,HTML_MESSAGE X-Spam-Check-By: apache.org Received-SPF: pass (asf.osuosl.org: local policy includes SPF record at spf.trusted-forwarder.org) Received: from [217.146.177.33] (HELO web26011.mail.ukl.yahoo.com) (217.146.177.33) by apache.org (qpsmtpd/0.29) with SMTP; Sun, 15 Oct 2006 09:27:53 -0700 Received: (qmail 16940 invoked by uid 60001); 15 Oct 2006 16:27:30 -0000 DomainKey-Signature: a=rsa-sha1; q=dns; c=nofws; s=s1024; d=yahoo.co.uk; h=Message-ID:Received:Date:From:Subject:To:MIME-Version:Content-Type:Content-Transfer-Encoding; b=PhheK1kREh3YXnOoPAZEa7GwBhLLvWGAAG8nYFmwoz8LBHndfiwX/Clm6+h7xeoURjpf+G97wIkxIwRilh1Y4rs9/JJ6M438YtY3NaS/89fi8qEd1eDozKOEMH9d3L1SEdAH/2Z6C6qjda3WJH8qaNLRZQmUHvZ94xxzRVYE9ig= ; Message-ID: <20061015162730.16938.qmail@web26011.mail.ukl.yahoo.com> Received: from [80.56.62.240] by web26011.mail.ukl.yahoo.com via HTTP; Sun, 15 Oct 2006 17:27:30 BST Date: Sun, 15 Oct 2006 17:27:30 +0100 (BST) From: Anthony Gardner Subject: Am very cheesed oof now apache2 and ptkdb To: mod_perl MIME-Version: 1.0 Content-Type: multipart/alternative; boundary="0-133508332-1160929650=:9156" Content-Transfer-Encoding: 8bit X-Virus-Checked: Checked by ClamAV on apache.org X-Spam-Rating: minotaur.apache.org 1.6.2 0/1000/N --0-133508332-1160929650=:9156 Content-Type: text/plain; charset=iso-8859-1 Content-Transfer-Encoding: 8bit I've even tried to get it running at home with the same luck .......... none (well, i get the gui but it's blank where the code should be) The steps I've taked are those as described in my mail below this one. Surely s.o out there must have an idea ;) please!! pretty please. I'm also getting this error to my error_log ... [notice] Apache::DB initialized in child 7164 Prototype mismatch: sub CORE::GLOBAL::exit: none vs (;$) at /usr/local/lib/perl/5.8.7/Tk.pm line 397 Anthony Gardner wrote: okay, I've hacked Devel::ptkdb and Apache::DB a bit as suggested by http://article.gmane.org/gmane.comp.apache.mod-perl/7562 changed a bit for MP2 and http://perl.apache.org/docs/1.0/guide/debug.html#ptkdb_and_Interactive_mod_perl_Debugging Now, I get the gui but no contents are displayed in it. If I step over a few times (blindly) I end up in ..... package IO::Handle::DESTROY the gui then dies and the output is displayed in the browser. If I manage to hit a process that's already run the debugger, i am able to see my program in the gui all wrapped in the ModPerl namespace but I still can't manage to step through the code. I still end up at IO::Handle::DESTROY Has everyone had to hack apache::DB and Devel::ptkdb ??? It's the same for a single or multi processess running. Am really curious about this. #!/usr/bin/perl -d:ptkdb use strict; sub BEGIN { $ENV{DISPLAY} = 'localhost:0.0'; } print 'Content-type: text/html' . "\n\n"; print "$$
"; print 'Hello
'; print 'Goodbye'; my $struct = { key1 => [ qw| Hello World |, { key2 => 'At Last!!' } ] }; print; ## just so I can see the contents of $struct -Ants Jeff Pang wrote: Hello, Have you loaded the ModPerl::Registry?How can you know your modperl scripts can't be run? When you meet problems,you can look at the error_log where you could find most of the problems. And,here is my mp2 config,it can run well for me: PerlModule ModPerl::Registry SetHandler perl-script PerlResponseHandler ModPerl::Registry PerlOptions +ParseHeaders Options +ExecCGI Good luck! -----Original Message----- >From: Anthony Gardner >Sent: Oct 13, 2006 3:53 AM >To: mod_perl >Subject: apache2 and ptkdb > >I'm having problems getting ptkdb to work under ModPerl::Registry. > >this works but it won;t be running under mod_perl > > > AllowOverride Limit >## SetHandler perl-script >## PerlResponseHandler ModPerl::Registry > PerlOptions +ParseHeaders > Options +ExecCGI > > >the following won't work at all > > > AllowOverride Limit > SetHandler perl-script > PerlResponseHandler ModPerl::Registry > PerlOptions +ParseHeaders > Options +ExecCGI > > >any ideas greatly appreciated > >CIA > >-Ants > > > > >--------------------------------- > Try the all-new Yahoo! Mail . "The New Version is radically easier to use" ?The Wall Street Journal -- Books below translated by me to Chinese. Practical mod_perl: http://home.earthlink.net/~pangj/mod_perl/ Squid the Definitive Guide: http://home.earthlink.net/~pangj/squid/ Send instant messages to your online friends http://uk.messenger.yahoo.com --------------------------------- Try the all-new Yahoo! Mail . "The New Version is radically easier to use" � The Wall Street Journal --0-133508332-1160929650=:9156 Content-Type: text/html; charset=iso-8859-1 Content-Transfer-Encoding: 8bit I've even tried to get it running at home with the same luck .......... none (well, i get the gui but it's blank where the code should be)

The steps I've taked are those as described in my mail below this one.

Surely s.o out there must have an idea ;) please!! pretty please.

I'm also getting this error to my error_log ...

[notice] Apache::DB initialized in child 7164
Prototype mismatch: sub CORE::GLOBAL::exit: none vs (;$) at /usr/local/lib/perl/5.8.7/Tk.pm line 397

Anthony Gardner <cyclewood_ltd@yahoo.co.uk> wrote:
okay,

I've hacked Devel::ptkdb and Apache::DB a bit as suggested by
http://article.gmane.org/gmane.comp.apache.mod-perl/7562

changed a bit for MP2

and

http://perl.apache.org/docs/1.0/guide/debug.html#ptkdb_and_Interactive_mod_perl_Debugging

Now, I get the gui but no contents are displayed in it. If I step over a few times (blindly) I end up in .....

package IO::Handle::DESTROY

the gui then dies and the output is displayed in the browser.

If I manage to hit a process that's already run the debugger, i am able to see my program in the gui  all wrapped in the ModPerl namespace but I still can't manage to step through the code.

I still end up at IO::Handle::DESTROY

Has everyone had to hack apache::DB and Devel::ptkdb ???

It's the same for a single or multi processess running.

Am really curious about this.

#!/usr/bin/perl -d:ptkdb

use strict;

sub BEGIN {
  $ENV{DISPLAY} = 'localhost:0.0';
}

print 'Content-type: text/html' . "\n\n";
print "$$<br />";
print 'Hello<br />';
print 'Goodbye';

my $struct = { key1 => [ qw| Hello World |, { key2 => 'At Last!!' } ] };

print; ## just so I can see the contents of $struct

-Ants

Jeff Pang <pangj@earthlink.net> wrote:
Hello,

Have you loaded the ModPerl::Registry?How can you know your modperl scripts can't be run?
When you meet problems,you can look at the error_log where you could find most of the problems.
And,here is my mp2 config,it can run well for me:

PerlModule ModPerl::Registry

SetHandler perl-script
PerlResponseHandler ModPerl::Registry
PerlOptions +ParseHeaders
Options +ExecCGI



Good luck!

-----Original Message-----
>From: Anthony Gardner
>Sent: Oct 13, 2006 3:53 AM
>To: mod_perl
>Subject: apache2 and ptkdb
>
>I'm having problems getting ptkdb to work under ModPerl::Registry.
>
>this works but it won;t be running under mod_perl
>
>
> AllowOverride Limit
>## SetHandler perl-script
>## PerlResponseHandler ModPerl::Registry
> PerlOptions +ParseHeaders
> Options +ExecCGI
>
>
>the following won't work at all
>
>
> AllowOverride Limit
> SetHandler perl-script
> PerlResponseHandler ModPerl::Registry
> PerlOptions +ParseHeaders
> Options +ExecCGI
>
>
>any ideas greatly appreciated
>
>CIA
>
>-Ants
>
>
>
>
>---------------------------------
> Try the all-new Yahoo! Mail . "The New Version is radically easier to use" ?The Wall Street Journal


--
Books below translated by me to Chinese.
Practical mod_perl: http://home.earthlink.net/~pangj/mod_perl/
Squid the Definitive Guide: http://home.earthlink.net/~pangj/squid/

Send instant messages to your online friends http://uk.messenger.yahoo.com

Try the all-new Yahoo! Mail . "The New Version is radically easier to use" � The Wall Street Journal --0-133508332-1160929650=:9156--