anchor.diff:      };
   
       testSubs = ''
  +      my ${"$" + name}_sharepath = '${sharePath}';
  +
         sub checkRunning_${name} {
           my $cmd = 'VBoxManage list runningvms | grep -q "^\"${name}\""';
           my ($status, $out) = $machine->execute(ru $cmd);
  
positive.code: 
      destroyVM_simple;
  
      subtest "net-hostonlyif", sub {
        createVM_test1;
        createVM_test2;
  
negative.code:     echo "$otherIP reachable" | ${pkgs.netcat}/bin/netcat -clp 5678 || :
    '';
  
    sysdDetectVirt = pkgs: ''
      ${pkgs.systemd}/bin/systemd-detect-virt > /mnt-root/result
    '';
  
    vboxVMs = mapAttrs createVM {
      simple = {};
  
      detectvirt.vmScript = sysdDetectVirt;
  
      test1.vmFlags = hostonlyVMFlags;
      test1.vmScript = dhcpScript;
  