Help for this page
use strict; use warnings; ... say q{-} x 20; say join $inc, @arr;
a1b2c3d4e -------------------- a6b7c8d9e
a0b0c0d0e -------------------- a1b1c1d1e