Select Code to Download

use strict;
use warnings;
...
  say $i ? join " ",$i,$s : $s;
}

jkl foobar
foobar
...
j jk foobar
jk jk foobar
jkl