C:\test>perl -E"say `tasklist|find \"$$\"`; $x=chr(0); $x x= 1040352; say `tasklist|find \"$$\"`; undef $x; say `tasklist|find \"$$\"`" perl.exe 129340 Console 1 4,688 K perl.exe 129340 Console 1 5,788 K perl.exe 129340 Console 1 4,780 K C:\test>perl -E"say `tasklist|find \"$$\"`; $x=chr(0); $x x= 1040351; say `tasklist|find \"$$\"`; undef $x; say `tasklist|find \"$$\"`" perl.exe 241476 Console 1 4,704 K perl.exe 241476 Console 1 5,788 K perl.exe 241476 Console 1 5,792 K