exists - #70070 (Allgemeines zu Perl)

Taulmarill

2006-09-20 13:05

User since
2004-02-19
1750 Artikel
BenutzerIn

user image

Quote

Code: (dl )

perl -e '%hash = (foo => ["bar", "foobar"]); $hashref = \$hash{foo};'

du machst hier eine referenz auf eine referenz. was du willst ist warscheinlich

Code: (dl )

1
2
3

%hash = (foo => ["bar", "foobar"]);
$arrayref = $hash{foo};
print $arrayref->[1] . "\n";

wenn du's dir gerne umständlich machen willst, kannst du natürlich auch esskars ansatz verfolgen ;)

$_=unpack"B*",~pack"H*",$_ and y&1|0& |#&&print"$_\n"for@.=qw BFA2F7C39139F45F78 0A28104594444504400 0A2F107D54447DE7800 0A2110453444450500 73CF1045138445F4800 0 F3EF2044E3D17DE 8A08A0451412411 F3CF207DF41C79E 820A20451412414 83E93C4513D17D2B