Aquariophile: WICHTIGE Info!

Beitrag lesen

Sorry hab die falsche version vom Script gepostet,
diese ist Richtig:

#!/usr/bin/perl

print "Content-type: text/html\n\n";

my %hash = ( "inge" => "21",
          "tom" => "14",
          "Nicole" => "32",
          "Roman" => "63",
          "Jakob" => "14",
          "Anna" => "12"
          );

%hash["inge","Roman","Anna"] = (undef,undef,undef);

print "Wenn man <u>undef</u> macht, ist es trotzdem noch da\n" if exists $hash[Anna];

%hash["inge","Roman","Anna"] = ();

print "Wenn man den Inhalt auf leer setzt, ist der key noch da\n" if exists $hash[Anna];

delete %hash["inge","Roman","Anna"];
print "Key wurde geloescht!\n" if exists $hash[Anna];