Perl a Titanik (RE: Zmrazeni RH6.0cz)

[Roztocil Bohuslav]

Šipky je možné vynechat:


  @a =
(0,1,2,3,[0,1,{addr=>'192.168.0.1',os=>'linux',name=>'internal.cz',
        users=>['karel','pavel','petr','alena']}]);
  print $a[4]->[2]->{users}->[2];   # takhle navrhuje Ondra X Dolezal
  print $a[4][2]{users}[2];         # coz lze i kratceji

mezi indexovaci operatory se vkladaji "automaticky".

Bob