$ perl -E " local $\"=q{,}; say qq{[@$_]} for [1..4],[5..8] "
[1,2,3,4]
[5,6,7,8]