Ubuntu中Fortran如何调用系统命令

在Ubuntu中，你可以使用Fortran的内置函数system()来调用系统命令。system()函数接受一个字符串参数，该字符串包含了你想要执行的系统命令。这是一个简单的示例：

program call_system_command
  implicit none
  integer :: status

  ! 调用系统命令 "ls" 并列出当前目录的内容
  status = system("ls")

  ! 检查命令执行状态
  if (status /= 0) then
    print *, "Error: Command failed with status", status
  else
    print *, "Command executed successfully"
  end if
end program call_system_command

在这个示例中，我们使用system()函数调用了ls命令来列出当前目录的内容。system()函数返回一个整数状态码，通常情况下，状态码为0表示命令执行成功，非0值表示命令执行失败。

请注意，使用system()函数调用系统命令可能会导致安全风险，特别是在处理用户输入时。因此，在使用system()函数时，请确保你了解所执行命令的功能，并避免直接将用户输入传递给系统命令。