Apache::HeavyCGI::Debug - inspect the Pseudohash as Hash with Data::Dumper

Apache-HeavyCGI documentation Contained in the Apache-HeavyCGI distribution.

Index

Code Index:

NAME

Top

Apache::HeavyCGI::Debug - inspect the Pseudohash as Hash with Data::Dumper

SYNOPSIS

Top

 push @layout, "<BR><PRE>",
               $self->instance_of("Apache::HeavyCGI::Debug"),
               "</PRE><BR>\n";

DESCRIPTION

Top

Can be used to inspect the application object within an output page. The Class is just implemented as an illustration.

Apache-HeavyCGI documentation Contained in the Apache-HeavyCGI distribution. 
package Apache::HeavyCGI::Debug;
use base 'Class::Singleton';
use Data::Dumper;
use strict;

sub as_string {
  my Apache::HeavyCGI::Debug $self = shift;
  my Apache::HeavyCGI $mgr = shift;

  # An AVHV is ugly to look at, so we convert to an HASH

  my(%f,$k,$v);

  while (($k,$v) = each %$mgr){
   next unless defined $v;
   $f{$k} = $v;
  }
  Data::Dumper::Dumper( \%f )
}

1;