diff --git a/ci/testnet-deploy.sh b/ci/testnet-deploy.sh
index 8335b6c6e..6c35a0a6b 100755
--- a/ci/testnet-deploy.sh
+++ b/ci/testnet-deploy.sh
@@ -184,7 +184,7 @@ findVms() {
   declare class="$1"
   declare filter="$2"
 
-  gcloud_FindInstances "$filter"
+  gcloud_FindInstances "$filter" show
   vmlist+=("${instances[@]/#/$class:}")
 }
 
@@ -216,7 +216,7 @@ delete_unreachable_validators() {
       # Validators are managed by a Compute Engine Instance Group, so deleting
       # one will just cause a new one to be spawned.
       echo "Warning: $vmName is unreachable, deleting it"
-      gcloud compute instances delete "$vmName" --zone "$vmZone"
+      gcloud_DeleteInstances "$vmName"
     fi
     echo "validator checked in ${SECONDS} seconds"
   ) >> "log-$vmName.txt" 2>&1 &
diff --git a/scripts/gcloud.sh b/scripts/gcloud.sh
index 59a1029fe..9553561d6 100644
--- a/scripts/gcloud.sh
+++ b/scripts/gcloud.sh
@@ -14,6 +14,8 @@
 #   "name:zone:public IP:private IP"
 #
 # filter   - The instances to filter on
+# options  - If set to the string "show", the list of instances will be echoed
+#            to stdout
 #
 # examples:
 #   $ gcloud_FindInstances "name=exact-machine-name"
@@ -21,14 +23,18 @@
 #
 gcloud_FindInstances() {
   declare filter="$1"
-  #gcloud compute instances list --filter="$filter"
+  declare options="$2"
   instances=()
   while read -r name zone publicIp privateIp status; do
     if [[ $status != RUNNING ]]; then
       echo "Warning: $name is not RUNNING, ignoring it."
       continue
     fi
-  instances+=("$name:$zone:$publicIp:$privateIp")
+    if [[ $options = show ]]; then
+      printf "%-20s | zone=%-10s publicIp=%-16s privateIp=%s" "$name" "$zone" "$publicIp" "$privateIp"
+    fi
+
+    instances+=("$name:$zone:$publicIp:$privateIp")
   done < <(gcloud compute instances list \
              --filter="$filter" \
              --format 'value(name,zone,networkInterfaces[0].accessConfigs[0].natIP,networkInterfaces[0].networkIP,status)')