小小更改,pure bash 最後一個小腳本

twf_cc

大假完結,可沒什麼時間了,在學習Ruby裡胡亂寫了幾個腳本,獻醜再發一個等價
ruby 的 String#method, 寫得不好,莫見笑。
[victor@localhost ~]$ ruby -e 'puts "uNiX OpERating Os".swapcase'
UnIx oPerATING oS

#! /bin/bash
# the word which in uppercase translate to lowercase,
# lowercase to uppercase.  Usage: $0 argument
# Idea comes from ruby's String#method `swapcase', written in pure bash
# CYGWIN_NT-6.0 User-PC 1.5.24, GNU bash version 3.2.17
# Jul 3, 2007 twf_cc@yahoo.com.hk
# public domain

  # init some stuff,
  output="" ; input=$* ; ilength=${#input} ; i=0

  # function, translate uppercase ==> lowercase, lowercase ==> uppercase
  swapcase() {

              # make a loop , split the word to translate one by one
              # in old fashion style, ;(
              while [ $ilength -gt 0 ]
                do

                  # word split with ${varffset:length}
                  wsplit=${inputi:1}

                  # make single char pattern matching
                  case "$wsplit" in
                    A) wsplit=a ;; a) wsplit=A ;;
                    B) wsplit=b ;; b) wsplit=B ;;
                    C) wsplit=c ;; c) wsplit=C ;;
                    D) wsplit=d ;; d) wsplit=D ;;
                    E) wsplit=e ;; e) wsplit=E ;;
                    F) wsplit=f ;; f) wsplit=F ;;
                    G) wsplit=g ;; g) wsplit=G ;;
                    H) wsplit=h ;; h) wsplit=H ;;
                    I) wsplit=i ;; i) wsplit=I ;;
                    J) wsplit=j ;; j) wsplit=J ;;
                    K) wsplit=k ;; k) wsplit=K ;;
                    L) wsplit=l ;; l) wsplit=L ;;
                    M) wsplit=m ;; m) wsplit=M ;;
                    N) wsplit=n ;; n) wsplit=N ;;
                    O) wsplit=o ;; o) wsplit=O ;;
                    P) wsplit=p ;; p) wsplit=P ;;
                    Q) wsplit=q ;; q) wsplit=Q ;;
                    R) wsplit=r ;; r) wsplit=R ;;
                    S) wsplit=s ;; s) wsplit=S ;;
                    T) wsplit=t ;; t) wsplit=T ;;
                    U) wsplit=u ;; u) wsplit=U ;;
                    V) wsplit=v ;; v) wsplit=V ;;
                    W) wsplit=w ;; w) wsplit=W ;;
                    X) wsplit=x ;; x) wsplit=X ;;
                    Y) wsplit=y ;; y) wsplit=Y ;;
                    Z) wsplit=z ;; z) wsplit=Z ;;
                    *) wsplit=$wsplit ;;
                  esac

                  # decrease the word length after translation
                  (( ilength-- ))

                  # increase the position length to split the next char
                  (( i++ ))

                  # result storage
                  output=${output}${wsplit}
                 done

                # print result
                echo $output
              }

  # action
  swapcase "$input"

寂寞烈火

用dd的conv以及楼主的技巧里提到的printf的用法

1. 
   
2. #!/bin/bash
   
3. #
   
4. ucase () {
   
5. echo -n $1|dd conv=ucase 2>/dev/null
   
6. }
   
7. lcase () {
   
8. echo -n $1|dd conv=lcase 2>/dev/null
   
9. }
   
10. n=0
    
11. str=$@
    
12. echo $str|grep -q "^[[:alpha:]]\+$" || { echo InputError!;exit 1; }
    
13. while((n<=${#str}));do
    
14.         [[ $(printf "%d" "'${str:$n:1}") -ge 97 && $(printf "%d" "'${str:$n:1}") -le 122 ]] && \
    
15.         ucase ${str:$n:1}
    
16.         [[ $(printf "%d" "'${str:$n:1}") -ge 65 && $(printf "%d" "'${str:$n:1}") -le 90 ]] && \
    
17.         lcase ${str:$n:1}
    
18. ((n++))
    
19. done
    
20. echo
    

复制代码