@list = (1,2,3,4,5);
print join(', ', @list[1 .. -1]), "\n";