The subroutine is called by:
call perror( string )
string
character*n
Input
The message. It is written preceding the standard error message for the last detected system error.
Example 1:
call perror( "file is for formatted I/O" )