use strict;
use warnings;

while (<>) {
  chomp;
  while (/[^\x09\x20-\x7E]/g) {
    print("Input contains illegal character \(ord:\ ", "$ord\) on line $.\n");
  }
}