diff options
author | peter <peter@FreeBSD.org> | 2000-06-17 19:06:13 +0000 |
---|---|---|
committer | peter <peter@FreeBSD.org> | 2000-06-17 19:06:13 +0000 |
commit | 9b7f685f773a6a2a4735d53054157356600d4b72 (patch) | |
tree | fc2cfc0d18d9197b604e983acf561a1e51af23c8 | |
parent | a3b2b68e080cf32cfbaf8a38709b9038fae50695 (diff) | |
download | FreeBSD-src-9b7f685f773a6a2a4735d53054157356600d4b72.zip FreeBSD-src-9b7f685f773a6a2a4735d53054157356600d4b72.tar.gz |
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..
-rw-r--r-- | sys/alpha/conf/gethints.pl | 2 | ||||
-rw-r--r-- | sys/i386/conf/gethints.pl | 2 | ||||
-rw-r--r-- | sys/i386/conf/makeLINT.pl | 2 | ||||
-rw-r--r-- | sys/pc98/conf/gethints.pl | 2 |
4 files changed, 4 insertions, 4 deletions
diff --git a/sys/alpha/conf/gethints.pl b/sys/alpha/conf/gethints.pl index d00582c..80586e3 100644 --- a/sys/alpha/conf/gethints.pl +++ b/sys/alpha/conf/gethints.pl @@ -8,7 +8,7 @@ # # $FreeBSD$ -while (<STDIN>) { +while (<>) { chop; s/#.*//; next unless /^device/; diff --git a/sys/i386/conf/gethints.pl b/sys/i386/conf/gethints.pl index d00582c..80586e3 100644 --- a/sys/i386/conf/gethints.pl +++ b/sys/i386/conf/gethints.pl @@ -8,7 +8,7 @@ # # $FreeBSD$ -while (<STDIN>) { +while (<>) { chop; s/#.*//; next unless /^device/; diff --git a/sys/i386/conf/makeLINT.pl b/sys/i386/conf/makeLINT.pl index 9fe2361..06af090 100644 --- a/sys/i386/conf/makeLINT.pl +++ b/sys/i386/conf/makeLINT.pl @@ -2,7 +2,7 @@ # $FreeBSD$ $lno=0; -while (<STDIN>) { +while (<>) { chop; s/#.*//; s/\f//g; diff --git a/sys/pc98/conf/gethints.pl b/sys/pc98/conf/gethints.pl index 51ac8a9..1a90029 100644 --- a/sys/pc98/conf/gethints.pl +++ b/sys/pc98/conf/gethints.pl @@ -8,7 +8,7 @@ # # $FreeBSD$ -while (<STDIN>) { +while (<>) { chop; s/#.*//; next unless /^device/; |