On 08/05/2016 12:53, Niko Tyni wrote: > Control: tag -1 moreinfo > > On Tue, May 03, 2016 at 06:00:08AM +0200, Xavier wrote: >> On 02/05/2016 13:51, Xavier Guimard wrote: >>> Package: libmouse-perl >>> Version: 2.4.5-1+b1 >>> Severity: normal > >>> When "use Mouse" is called under ModPerl::Registry, it provides a strange >>> "No >>> package name defined" error. This bug affects only Debian testing, and is >>> not >>> found under Ubuntu 15.10 and Debian stable. No such error using Moose. > >> Here is a simple CGI test that fails : > > Hi, thanks for the report. I can't reproduce your issue on current > unstable with your example and this Apache configuration: > > <Location /test.pl> > SetHandler perl-script > PerlHandler ModPerl::Registry > Options ExecCGI > </Location> > > I just get the 'OK' output with this. > > Can you please provide a simple Apache configuration that triggers it?
Hello, it's a bit more complex (some Perl code was loaded). Here is an example that reproduce the problem (the key is to load Mouse in a PerlModule parameter and launch another Mouse code with ModPerl::Registry): Apache.conf: PerlModule My <VirtualHost *:80> ServerName test.example.com # DocumentRoot DocumentRoot /var/www/test <Directory /var/www/test> Require all granted Options +ExecCGI +FollowSymLinks </Directory> # Perl script <Files *.pl> SetHandler perl-script PerlResponseHandler ModPerl::Registry </Files> </VirtualHost> test.pl: package main; use CGI; use My2; my $q = CGI->new(); print $q->header( -type => 'text/html' ); print '<html><body>OK</body></html>'; My.pm: package My; use strict; use Mouse; has a => ( is => 'rw' ); 1; My2.pm: package My2; use strict; use Mouse; has b => ( is => 'rw' ); 1;
