gnac 211 B

1234567891011121314
  1. #!/bin/sh
  2. if [ "$1" = "-h" ]; then
  3. cat <<EOF>&2
  4. Usage: ${0##*/} [FILES]
  5. Grep non-ascii characters. If no files are provided, use stdin.
  6. EOF
  7. exit
  8. fi
  9. perl -ne 'chomp; print $_, "\n" if /[[:^ascii:]]/' "$@"