File mttroot/mtt/bin/capitalise_initial artifact b5ca98d45c part of check-in 37b5fb06f3
#! /bin/sh phrase="$*" initial=$(echo $phrase | sed 's/\(.\).*/\1/') Initial=$(echo $initial | tr [a-z] [A-Z]) echo $phrase | sed s/$initial/$Initial/
#! /bin/sh phrase="$*" initial=$(echo $phrase | sed 's/\(.\).*/\1/') Initial=$(echo $initial | tr [a-z] [A-Z]) echo $phrase | sed s/$initial/$Initial/