one-true-awk/testdir/t.coerce2

*23f24377SWarner Losh{
*23f24377SWarner Losh	print index(1, $1)
*23f24377SWarner Losh	print substr(123456789, 1, 3)
*23f24377SWarner Losh	print 1 in x
*23f24377SWarner Losh	print 1 23 456
*23f24377SWarner Losh	print 123456789 ~ 123, 123456789 ~ "abc"
*23f24377SWarner Losh}