[Catalyst] pre-loading with PerlModule

[Jonathan Rockway]

Perrin Harkins wrote:
> Michael Reece wrote:
>> that works!  do you know why this makes a difference?
> 
> I believe it's a bug in the way PerlModule works.  It should be the same
> thing as a "use" but it doesn't seem to respect the module already being
> in %INC in the same way.  This may be fixed in recent versions of
> mod_perl 2.

The real problem is that simply require()ing MyApp runs MyApp->setup,
which doesn't leave much room for flexibility.  This will be fixed in 5.8+.

-- 
package JAPH;use Catalyst qw/-Debug/;($;=JAPH)->config(name => do {
$,.=reverse qw[Jonathan tsu rehton lre rekca Rockway][$_].[split //,
";$;"]->[$_].q; ;for 1..4;$,=~s;^.;;;$,});$;->setup;