--- lib/PXElator/client.pm	2009/08/27 18:59:12	313
+++ lib/PXElator/client.pm	2009/08/28 16:41:46	322
@@ -9,6 +9,7 @@
 
 use server;
 use format;
+use ip;
 
 our $debug = $server::debug;
 
@@ -149,4 +150,13 @@
 	symlink ip_path($new), mac_path($mac);
 }
 
+sub all_ips {
+	sort { ip::to_int($a) cmp ip::to_int($b) }
+	map {
+		my $ip = $_;
+		$ip =~ s{^.+/ip/}{};
+		$ip;
+	} glob("$server::conf/ip/*") 
+}
+
 1;