/bin/ps -axwwo command= | perl -pe '$_ = /\.app\/Contents/ && m{([^/]+\.app)/} ? $1 : ""'