1 files changed, 16 insertions, 0 deletions
diff --git a/update-gitjoe.pl b/update-gitjoe.pl
index b79f9aa..a4eccdd 100755
--- a/update-gitjoe.pl
+++ b/update-gitjoe.pl
@@ -5,6 +5,22 @@ use warnings;
 use Term::ANSIColor;
 
 sub main {
+	my $homedir = '/usr/home/';
+	my @users;
+	opendir(DIR, $homedir);
+	my $i = 0;
+	while (my $dir = readdir(DIR)) {
+		next if ($dir eq 'git-ro');
+		next if ($dir =~ m/^\./);
+		$users[$i] = $dir;
+		$i += 1;
+	}
+	closedir(DIR);
+	$i = 0;
+	while ($i < @users) {
+		print $users[$i] . "\n";
+		$i += 1;
+	}
 	exit;
 }