while (<>) { print if /^[^A-Z0-9.-]+$/; }