t0050: perl portability fix

Older versions of perl (such as 5.005) don't understand -CO, nor
do they understand the "U" pack specifier. Instead of using perl,
let's just printf the binary bytes we are interested in.

Signed-off-by: Jeff King <peff@peff.net>
Tested-by: Johannes Sixt <johannes.sixt@telecom.at>
Signed-off-by: Junio C Hamano <gitster@pobox.com>
This commit is contained in:
Jeff King 2008-03-12 17:30:10 -04:00 committed by Junio C Hamano
parent 40a7ce64e1
commit e8e29c7b55

View file

@ -4,8 +4,8 @@ test_description='Various filesystem issues'
. ./test-lib.sh
auml=`perl -CO -e 'print pack("U",0x00E4)'`
aumlcdiar=`perl -CO -e 'print pack("U",0x0061).pack("U",0x0308)'`
auml=`printf '\xc3\xa4'`
aumlcdiar=`printf '\x61\xcc\x88'`
test_expect_success 'see if we expect ' '