use lib ".";                   
use Bah;                      
                               
use strict;                    
                               
use Data::Dumper;              
                               
my $bah = Bah->new();        
                               
print $bah->toString() . "\n";
$bah->printBah();