DB<158> %h=();

  DB<159> ref $h{a}{b}[2]{c}     # not an object
 => ""

  DB<160> $cycle = sub { 
                     $_[0]++; 
                     $_[0] %= $_[1] 
                   }

  DB<161> $h{a}{b}[2]{c}->$cycle(3);                   \%h
 => { a => { b => [undef, undef, { c => 1 }] } }

  DB<162> $h{a}{b}[2]{c}->$cycle(3);                   \%h
 => { a => { b => [undef, undef, { c => 2 }] } }

  DB<163> $h{a}{b}[2]{c}->$cycle(3);                   \%h
 => { a => { b => [undef, undef, { c => 0 }] } }

##</code><code>##

  DB<100> $a=5
 => 5

  DB<101> $a->inc
Can't call method "inc" without a package or object reference 

##</code><code>##

'literal string'.match(/string/)

##</code><code>##

  push @newelements, @{ $a{blossom}{caterpillar}{$loopvalue}[CONSTANT]{Iforgot}  }

##</code><code>##

  a["blossom"]["caterpillar"][loopvalue][CONSTANT]["Iforgot"].push(elements).shift()