C:\test>perl -Mstrict -wE"say eval join'+',()"


C:\test>perl -Mstrict -wE"say eval join'+',0"
0

C:\test>perl -Mstrict -wE"say eval join'+',-1"
-1

C:\test>perl -Mstrict -wE"say eval join'+',-1..+3"
5