システムプロセスに関する統計をリアルタイムで得る 

Unixベースのシステムでは，SemanticImportを使ってシステムプロセスについての統計をリアルタイムで得ることができる．

システムシェルを実行して開始する．

In[1]:=

X shell = StartProcess[$SystemShell];

次に"ps"コマンドを実行し，短時間休止した後，出力を得る．

In[2]:=

X WriteLine[shell, "ps -Ao pid,%cpu,user,start_time,comm"]; Pause[1.5]; output = ReadString[shell, EndOfBuffer];

SemanticImportStringを使ってデータを解析する．

In[3]:=

X SemanticImportString[output]

Out[3]=

CPU使用量が最も高いプロセスを示す関数を作成する．

In[4]:=

X getProcessGrid[shell_, n_] := Module[{}, WriteLine[shell, "ps -Ao pid,%cpu,user,start_time,comm"]; Pause[1.5]; Grid[Prepend[ Take[Reverse[SortBy[SemanticImportString[ ReadString[shell, EndOfBuffer], Automatic, "Rows"], #[[2]] &]], n], Style["\n " <> # <> " \n", Bold] & /@ {"Process id", "% CPU", "User", "Start time", "ProcessName"} ], Frame -> All] ]

CPU使用量を動的に更新する表を作成する．

In[5]:=

X Dynamic[getProcessGrid[shell, 10], UpdateInterval -> 5]

Out[5]=