C:\test>\perl22\bin\perl -e"my$s=do{local(@ARGV,$/)='1gb.db';<>}; print `tasklist /nh /fi \"PID eq $$\"`;" perl.exe 2948 Console 1 1,218,828 K