getc. Note well the documentation -- it's still buffered input!

ObSampleCode:

while ($_ = getc STDIN) {
  $_ = ord $_;
  printf "%02x %c\n", $_, 32 <= $_ && $_ < 127 ? $_ : ord '?';
}
[download]