usr.bin/perl/Configure

99 		PATH=`cmd /c "echo %PATH%" | tr '\\\\' / `
100 		OS2_SHELL=`cmd /c "echo %OS2_SHELL%" | tr '\\\\' / | tr '[A-Z]' '[a-z]'`
301 tr=''
1927 case "`echo AbyZ | tr '[:lower:]' '[:upper:]' 2>/dev/null`"-"`echo AbyZ | tr '[:upper:]' '[:lower:]' 2>/dev/null`" in
1928 ABYZ-abyz) spackage=`echo $first | tr '[:lower:]' '[:upper:]'`$last;;
1929 *) spackage=`echo $first | tr '[a-z]' '[A-Z]'`$last;;
2169 : Find the appropriate value for a newline for tr
2174 	case "`echo foo | tr '\n' x 2>/dev/null`" in
2179 	case "`echo foo | tr '\012' x 2>/dev/null`" in
2184        case "`echo foo | tr '\r\n' xy 2>/dev/null`" in
2191 $me: Fatal Error: cannot figure out how to translate newlines with 'tr'.
2281 			ans=\`echo $n "\$ans$c" | tr '$trnl' ' '\`
2558 tr
3266 case "`echo AbyZ | $tr '[:lower:]' '[:upper:]' 2>/dev/null`"-"`echo AbyZ | $tr '[:upper:]' '[:lower:]' 2>/dev/null`" in
3268 	echo "Good, your tr supports [:lower:] and [:upper:] to convert case." >&4
3275 	    case "`echo RS | $tr '[R-S]' '[r-s]' 2>/dev/null`" in
3282 	    case "`echo RS | $tr R-S r-s 2>/dev/null`" in
3293 		    case "`echo RS | $tr '[A-IJ-RS-Z]' '[a-ij-rs-z]' 2>/dev/null`" in
3300 		    case "`echo RS | $tr A-IJ-RS-Z a-ij-rs-z 2>/dev/null`" in
3310 case "`echo RS | $tr \"$up\" \"$low\" 2>/dev/null`" in
3316     echo "Your tr is not acting any way I know of." >&4
3320 : set up the translation script tr, must be called with ./tr of course
3321 cat >tr <<EOSC
3324 '[A-Z][a-z]') exec $tr '$up' '$low';;
3325 '[a-z][A-Z]') exec $tr '$low' '$up';;
3327 exec $tr "\$@"
3329 chmod +x tr
3330 $eunicefix tr
3341 # tr '[A-Z]' '[a-z]' would not work in EBCDIC
3344 	./tr '[A-Z]' '[a-z]' | $tr $trnl ' '`
3598 					osvers=`sizer -v | awk -FUNIX '{print $2}' | awk '{print $1}' |  tr '[A-Z]' '[a-z]' | sed 's/^[xvt]//'`
3674 			(what /vmunix | UU/tr '[A-Z]' '[a-z]') > UU/kernel.what 2>&1
3882 *) osname=`echo "$ans" | $sed -e 's/[ 	][	]*/_/g' | ./tr '[A-Z]' '[a-z]'`;;
3991 	expr "$fn" : '.*(\(.*\)).*' | $tr ',' $trnl >getfile.ok
4503 elif test `echo abc | $tr a-z A-Z` = Abc ; then
4938 vos) cppfilter="tr '\\\\>' '/' |" ;; # path component separator is >
5907 		if $test $testaccess \`echo \$1 | $tr -d '"'\`; then
5947 	name=\`echo \$cline | $awk "\$awkprg" | $tr -d '"'\`
6531 			tr ' ' $trnl | egrep -v '\.[A-Za-z]*$' | $sed -e '
6597 	echo $libpth | $tr ' ' $trnl | $sort | $uniq > libpath
6615 echo $libc $libnames | $tr ' ' $trnl | $sort | $uniq > libnames
9212 	myhostname=`echo $myhostname | ./tr '[A-Z]' '[a-z]'`
9308 	mydomain=`echo $mydomain | ./tr '[A-Z]' '[a-z]'`
9316 	case `$phostname | ./tr '[A-Z]' '[a-z]'` in
12143     enum=`$echo $ENUM|./tr '[A-Z]' '[a-z]'`
22683 echo $xxx | $tr ' ' $trnl | $sort | $uniq | $awk '
22755 	for xx in `echo $xxx | $tr ' ' $trnl | $sort | $uniq`; do
22790 	echo $@ | $tr ' ' $trnl | \
23720 ./tr '-' '_' <<EOSH >>Cppsym.know
23723 ./tr '[a-z]' '[A-Z]' < Cppsym.know > Cppsym.a
23724 ./tr '[A-Z]' '[a-z]' < Cppsym.know > Cppsym.b
23726 $cat Cppsym.a Cppsym.b Cppsym.c | $tr ' ' $trnl | $sort | $uniq > Cppsym.know
23731     echo \$* | $tr " " "$trnl" | ./Cppsym.try > Cppsym.got
23739     $tr " " "$trnl" | ./Cppsym.try
23802 aix) postprocess_cc_v="|$tr , ' '" ;;
24176 xs_extensions=`echo "$*" | tr ' ' $trnl | $sort | tr $trnl ' '`
24179 nonxs_extensions=`echo "$*" | tr ' ' $trnl | $sort | tr $trnl ' '`
24181 known_extensions=`echo $nonxs_extensions $xs_extensions  | tr ' ' $trnl | $sort | tr $trnl ' '`
25740 tr='$tr'