Shell Programming and Scripting

#!/bin/bash -

# @(#) s3       Demonstrate expr: /usr/ucb/expr works on Solaris.

echo
version >/dev/null 2>&1 && version =o $(_eat $0 $1)
# set -x        # enable to debug as necessary

cat >t1 <<'EOF'
E="$1"
YEAR=${2-2008}
echo " Results for $E, length of YEAR=$YEAR is $($E length $YEAR)"

echo " $E substr:"
$E substr $YEAR 1 1
$E substr $YEAR 2 1
$E substr $YEAR 3 1
$E substr $YEAR 4 1

echo " $E string:"
$E $YEAR : '.*\(.\)$'

echo " $E match:"
$E match $YEAR '.*\(.\)$'

echo " End of test for $E "
EOF

chmod +x t1
L="/usr/xpg4/bin//expr /usr/bin/expr /usr/ucb/expr /usr/xpg6/bin/expr"
L=/usr/ucb/expr
for command in $L
do
  echo
  ./t1 "$command" 2007
done

exit 0

$ ./s3

SunOS 5.10
GNU bash 3.00.16

 Results for /usr/ucb/expr, length of YEAR=2007 is 4
 /usr/ucb/expr substr:
2
0
0
7
 /usr/ucb/expr string:
7
 /usr/ucb/expr match:
7
 End of test for /usr/ucb/expr