On Tue, Nov 18, 2003 at 09:11:36AM +0000, Ged Haywood wrote: ... > What happens if you just say > > print STDERR "\$r = [$r]\n"; > > after the assignment to $r?
This problem only seems to occur on our production site. Maybe I can reproduce it on a staging server by hammering it with requests, in which case I'll add the debug you requested. Otherwise, I'll have to wait a few weeks before I can push code to the production site. ... > > Transaction2: rclass1='' rclass='' r=$VAR1 = 'PrintMe::Transaction2'; > > [Thu Nov 13 21:04:55 2003] [error] Can't locate object method "header_in" via > > package "PrintMe::Transaction2" (perhaps you forgot to load > > "PrintMe::Transaction2"?) at /home/www/www/Libs/PrintMe/Transaction2.pm line 35. > > I see only one error here. What's on line 35? Here it is, in context: 26 # check for intermittent error where r seems to be wrong class 27 28 my $rclass = ref $r; 29 if($rclass ne 'Apache') { 30 print STDERR "Transaction2: rclass1='$rclass1' rclass='$rclass' r=" . Dumper($r); 31 } 32 33 # Read in the XML message: 34 35 my $cl = $r->header_in('Content-length') or return banner(); -- Reporting bugs: http://perl.apache.org/bugs/ Mail list info: http://perl.apache.org/maillist/modperl.html