The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.
package VCP::Dest::data_dump ;

=head1 NAME

VCP::Dest::data_dump - developement output

=head1 DESCRIPTION

Dump all data structures.  Requires the module BFD, which is not installed
automatically.

Not a supported module, API and behavior may change without warning.

=cut

$VERSION = 0.1 ;

@ISA = qw( VCP::Dest );

use strict ;

use VCP::Dest;
#use base qw( VCP::Dest );

sub handle_header {
   warn "\n";
   require BFD; ## load lazily so as to not force all users to install BFD
   BFD::d( $_[1] );
}

sub handle_rev {
   warn "\n";
   BFD::d( $_[1]->as_hash );
}


sub handle_footer {
   warn "\n";
   BFD::d( $_[1] );
}


=head1 AUTHOR

Barrie Slaymaker <barries@slaysys.com>

=head1 COPYRIGHT

Copyright (c) 2000, 2001, 2002 Perforce Software, Inc.
All rights reserved.

See L<VCP::License|VCP::License> (C<vcp help license>) for the terms of use.

=cut

1