Bryan R Harris wrote:
Is there a way to determine in perl whether the current script was run from a login shell or not?
if(-t STDIN) {
print "Hello terminal\n";
} else {
print "Content-type: text/html\n\n";
print "Hello <b>Browser</b>\n";
}
HTH :)
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
<http://learn.perl.org/> <http://learn.perl.org/first-response>
