Opened by bianca at 2010-05-02 13:09
Code (perl): (dl
)
1 2 3 4 5 6 7
my $reftype=ref $hash{test}{1}; if($reftype eq "HASH"){ ... } elsif($reftype eq ''){ ... }
"ref" kann zurückgeben: "SCALAR" "CODE" "ARRAY" "HASH" oder den Klassen(Paket)-Namen eines Objektes. Wenn es keine Referenz ist dann wird ein leerer String zurückgeliefert.