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

 1#!/bin/sh
 2
 3args=""
 4
 5for i in "${@}"
 6do
 7    case "$i" in
 8    -I?:/*)
 9        i="$(echo "${i}" | sed -e 's|^-I\(.\):/|-I/\1/|')"
10	;;
11    esac
12
13    args="${args} '${i}'"
14done
15
16eval "exec perl $args"