use ManVideo;
my $mv = new ManVideo( DB => $dbhRef );
$mv -> newVideoRecord ( Trainer => "someone", Year => 2011, VideoType => "training" );
$mv -> save();

##</code><code>##

my $aud = new ManAudio;
$aud -> newAudioRecord( ..., AudioType => "meeting" ) ;# implement by ManVideo::newVideoRecord;