Help for this page

Select Code to Download

Select or download this
```
  DB<100> w @{[$z++]}
```

Select or download this

  DB<101> w @{[$z++]}

...
    old value:    '1'
    new value:    '2'
main::(tst.pl:13):    print $x++;