$config{'pop'.$username}->bind('<Map>', sub {print "hallo\n";});