The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.
$|++;
print "# Child has TTY? " . (-t STDIN ? "YES" : "NO" ) . $/;
print $_ = <>;