$ perl -e 'push @a, 1 for 1..100000; system"ps -flp $$"'
....  SZ 
.... 608
$ perl -e 'push @a, "" for 1..100000; system"ps -flp $$"'
....  SZ
.... 905