package VCP::Dest::foo ; =head1 NAME VCP::Dest::foo - developement output =cut $VERSION = 0.1 ; use strict ; use base qw( VCP::Dest ); use BFD; sub handle_header { d $_[1]; } sub handle_rev { d $_[1]->as_hash; } sub handle_footer { d $_[1]; } =back =head1 AUTHOR Barrie Slaymaker =head1 COPYRIGHT Copyright (c) 2000, 2001, 2002 Perforce Software, Inc. All rights reserved. See L (C) for the terms of use. =cut 1