Excellent! Worked like a charm! This is exactly the kind of thing I was looking for.
Alternatively, you can use the '-t' operator:
exit 0 if -t STDIN
I've been waiting for this for a LONG time, thanks Smoot.
- B
Thanks!
Keith P. Boruff
-- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] <http://learn.perl.org/> <http://learn.perl.org/first-response>