From cb734891e16d9c567deeb5ca28d522abb9b3683e Mon Sep 17 00:00:00 2001
From: Jeff Carr <jcarr@linuxmachines.com>
Date: Mon, 3 Oct 2011 11:50:03 -0400
Subject: [PATCH] * also write out the testservers file

---
 loadbot/make_do_all.pl | 3 +++
 1 file changed, 3 insertions(+)

diff --git a/loadbot/make_do_all.pl b/loadbot/make_do_all.pl
index 6a1216f..a14a0aa 100755
--- a/loadbot/make_do_all.pl
+++ b/loadbot/make_do_all.pl
@@ -3,13 +3,16 @@
 use strict;
 
 open OUT, ">do_all.sh";
+open OUT2, ">testservers";
 
 foreach my $line (split "\n", `cat /tmp/junk`) {
 	my @parts = split " ", $line;
 	print OUT "./ssh.pl $parts[13] root $parts[7] \$1\n";
+	print OUT2 "$parts[13]\n";
 }
 
 close OUT;
+close OUT2;
 
 # system "chmod +x do_all.sh";
 system "cat do_all.sh";