C:\test>\perl32\bin\perl -Mstrict -we"my @a = 1..10; delete $a[5]; print qq[@a]"
Use of uninitialized value in join or string at -e line 1.
1 2 3 4 5  7 8 9 10

C:\test>\perl64\bin\perl -Mstrict -we"my @a = 1..10; delete $a[5]; print qq[@a]"
Use of uninitialized value in join or string at -e line 1.
1 2 3 4 5  7 8 9 10