--- lib/PXElator/tftpd.pm	2009/07/30 21:31:30	67
+++ lib/PXElator/tftpd.pm	2009/07/30 22:43:48	68
@@ -14,7 +14,7 @@
 
 sub path {
 	my $glob = shift;
-	my $path = glob("$dir/$glob");
+	my $path = (glob("$dir/$glob"))[0];
 	die "can't find anything for $dir/$glob" unless $path;
 warn $path;
 	$path =~ s{^$dir}{};