如何将字符串“04L”变成“04”和“L”？

Question

自从我编写了很多Fortran代码以来，已有将近四十年了。如果我有一个字符串：

"04L       "

如何提取数字部分（总是2位数），单个字母和忽略尾随空格？我想最终得到两个字符串"04"和"L"。

我正在修改Fortran 90程序。

Answer 1

只需使用索引：str(1:2)是前两个字符，str(3:3)是第三个字符。这是一个最低限度的例子：

program test
  character(len=*),parameter :: str = "04L       "

  print *,str(1:2)
  print *,str(3:3)
end program