sub rarelyusedfunction
{
        my $self = shift;
        my $cl = Foo::CodeLoader->new();

        $cl->load('DDS');

        my $dds = Data::Dump::Streamer->new;
        $dds->Dump($self)->Out();

}