Hmm, I didn't get anything weird during at least 10000 iterations:

# all like SCALAR(0x81nnnnn)
$ perl -le'$#a=10000;print \$_ for @a' |fgrep -v x81
$
[download]

But I'm on Ubuntu, not Windows, so maybe it's different.