Revision 4eee6fad05d6a5711e3084de59f8fd7b9064a259 authored by Brad Lassey on 05 December 2011, 21:57:33 UTC, committed by Brad Lassey on 05 December 2011, 21:57:33 UTC
1 parent 9adff91
Raw File
msys-perl-wrapper
#!/bin/sh

args=""

for i in "${@}"
do
    case "$i" in
    -I?:/*)
        i="$(echo "${i}" | sed -e 's|^-I\(.\):/|-I/\1/|')"
	;;
    esac

    args="${args} '${i}'"
done

eval "exec perl $args"
back to top