한글파일명으로 저장된 파일을 찾을 이슈가 있었다..
# find . -not -exec ./ascii-only.sh {} \; -print
./xxxx/_유료.flv
./xxxx/_1_무료.flv
./xxxx/_2_무료.flv
# cat ./ascii-only.sh
#!/usr/local/bin/gosh
;; - * - mode : scheme; coding : utf-8 - * -
;;
;; nihongo.scm -
;;
;; Copyright (C) 2009 by mzp
;; Author : MIZUNO Hiroki / mzpppp at gmail dot com
;; http://howdyworld.org
;;
;; Timestamp : 2009/02/19 21:53:57
;;
;; This program is free software; you can redistribute it and / or
;; modify it under MIT Lincence.
;;
(use srfi-1)
(use srfi-14)
(define (ascii-only? xs)
(every
(cut char-set-contains?
char-set:ascii
<>)
(string->list xs)))
(define (main args)
(if (every ascii-only? (cdr args))
(exit 0)
(exit 1)))
* gosh 설치
http://practical-scheme.net/gauche/download.html
