my $cmd = $self->{_is_vms} ? "MCR $^X" : ( $^O eq 'MSWin32' ? Win32::GetShortPathName($^X) : $^X);