for (@cmd) {
  $_ = (split "\n", $_)[0];
}