$a [$J * ($i - 1) + $j]

##</code><code>##

    $a [($J + 1) * $i + $j]

##</code><code>##

    $a [5 .. @a]

##</code><code>##

    $a [5 .. @a - 1]

##</code><code>##

    $a [5 .. $#a]