use strict;
require 'feiertage.pl';

my %f=&feiertage(2007,"Bayern");

foreach(keys %f){print "$_ $f{$_}\n";}