while(($schluessel,$wert)=each(%paare))
{
    print "Der Wert von $schluessel ist $wert!";
}