perl t50 </dev/tty
perl t50 2>/dev/null