local $, = ", ";
local $\ = "\n";

for (1..2) {
   print map { ++$_ } 0..4;
}