a short note:

local $" = ', ';

the local is meaningless here because you are at file scope and strict.pm does not complain about its use.