package Foo::Bar::Baz;

use strict;
use warnings;
use Carp;

our @ISA = qw( Foo::Bar );

1;

sub init {
  my $self = shift;
  my %opt = @_;
  
  # do the actual init for this specific class
}