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