C:\>more f
print $_ . ': ' . $erg{$_} . '<br />' . "\n" foreach (keys %erg);

C:\>perl -MO=Deparse,-p f
foreach $_ (keys(%erg)) {
    print((((($_ . ': ') . $erg{$_}) . '<br />') . "\n"));
}
f syntax OK