#!/usr/bin/perl

@FILES=glob("/dev/*");
foreach $file (@FILES) {
	if ($file ne "/dev/MAKEDEV" && $file ne "/dev/MAKEDEV.local") {
		if (-f $file) {
			print "$file\n";	
		};
	}
}