- my $cmd = "plutil -convert $which -s -o - -";
- my $pid = open3 (my $in, my $out, undef, $cmd) || error ("pipe: $cmd: $!");
+ my @cmd = ('plutil', '-convert', $which, '-s', '-o', '-', '-');
+ my $pid = open3 (my $in, my $out, undef, @cmd) ||
+ error ("pipe: $cmd[0]: $!");
+ error ("$cmd[0]: $!") unless $pid;