Select Code to Download

  DB<117> sub tst { map {$_[$_]+1} 0..3 }

  DB<118> tst 1..10
 => (2, 3, 4, 5)

  DB<148> @a=  map { int rand 100 } 1..5
 => (32, 4, 90, 79, 70)
...
CODE(0xa353ea8) 0 1 2 3 4    1:0,3:2
CODE(0xa353ea8) 0 1 2 3 4    1:0,4:3
 => 1