/js/src/build/msys-perl-wrapper

http://github.com/zpao/v8monkey · Shell · 16 lines · 11 code · 4 blank · 1 comment · 1 complexity · 460c1bff0f92d261743e668b97ba9187 MD5 · raw file 

    

  1. #!/bin/sh
    2. 

  2. 

  3. args=""
    4. 

  4. 

  5. for i in "${@}"
    6. 

  6. do
    7. 

  7.     case "$i" in
    8. 

  8.     -I?:/*)
    9. 

  9.         i="$(echo "${i}" | sed -e 's|^-I\(.\):/|-I/\1/|')"
    10. 

  10. 	;;
    11. 

  11.     esac
    12. 

    13. 

  13.     args="${args} '${i}'"
    14. 

  14. done
    15. 

    16. 

  16. eval "exec perl $args"
    17.