character (len=11)::test
test = "hello world"
print*,test