Slightly unrelated (maybe), you should never use this
while ($line = <STDIN>)
but instead do
while (defined($line = <STDIN>))
because one day you'll be bitten by <STDIN> returning a single "0"
and you'll be dead.
perl -w should warn you about this BTW.
Florent
- qmail, perl, and header rewrites Mahlon Smith
- Re: qmail, perl, and header rewrites Mahlon Smith
- Re: qmail, perl, and header rewrites Efg�
- Re: qmail, perl, and header rewrites Paul J. Schinder
- Re: qmail, perl, and header rewrites Russ Allbery
