clear
cStr1 = 'i live in a condo.'
cStr2 = 'the condo life for me.'
cStr3 = 'The first character was upper case to start with'

?first_upper(cStr1)
?first_upper(cStr2)
?first_upper(cStr3)
?
cStr = 'i live in a condo!   test CRLF.'+chr(13)+chr(10)+'is the condo life for me?  The condo life.  the end.'
?cStr
?
f = new file()
f.create('first_upper_test.txt')
f.write(cStr,len(cStr))
f.close()
? first_upper(cStr)
?
f = new file()
f.open('first_upper_test.txt')
nSize = f.size('first_upper_test.txt')
cRead = first_upper(f.read(nsize))
f.create('first_upper_test_output.txt')
f.write(cRead,len(cRead))
f.close()
?cRead