Use while (<>) instead of while(<STDIN>) so that perl will automagically

deal with filename arguments.  It is amazing how much you forget over time.

Thanks to the people that reminded me this.  I knew there was an easy way
that didn't involve messing with $argv, filehandles, etc, but just could
not remember - all of my books are on the opposite side of the planet..

sys/alpha/conf/gethints.pl

@@ -8,7 +8,7 @@
 #
 # $FreeBSD$
 
-while (<STDIN>) {
+while (<>) {
 	chop;
 	s/#.*//;
 	next unless /^device/;

sys/i386/conf/gethints.pl

@@ -8,7 +8,7 @@
 #
 # $FreeBSD$
 
-while (<STDIN>) {
+while (<>) {
 	chop;
 	s/#.*//;
 	next unless /^device/;

sys/i386/conf/makeLINT.pl

@@ -2,7 +2,7 @@
 # $FreeBSD$
 
 $lno=0;
-while (<STDIN>) {
+while (<>) {
 	chop;
 	s/#.*//;
 	s/\f//g;

sys/pc98/conf/gethints.pl

@@ -8,7 +8,7 @@
 #
 # $FreeBSD$
 
-while (<STDIN>) {
+while (<>) {
 	chop;
 	s/#.*//;
 	next unless /^device/;