Advertisement
Senethril

Untitled

Jun 30th, 2015
186
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Perl 6 0.29 KB | None | 0 0
  1. for process in ComObjGet("winmgmts:").ExecQuery("Select * from Win32_Process")
  2.     ;name=process.Name
  3.     msgbox % process.Name
  4.     ifInString , process.Name , firefox
  5.     {
  6.     processes .= process.Name "  -  " process.ExecutablePath "  -  " process.CommandLine "`n"
  7.     }
  8.  
  9. Msgbox,%processes%
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement