my $genre_objekt = Trk_dict->new('/path/file/rock_and_socks.bin') 
   or die $@;