Anonymous user
File modification time: Difference between revisions
m
→{{header|REXX}}: changed/added comments and whitespace, changed indentations.
(→{{header|Factor}}: For completeness.) |
m (→{{header|REXX}}: changed/added comments and whitespace, changed indentations.) |
||
Line 1,076:
{{works with|Regina REXX}}
The REXX language has no facility to update a file's modification time.
<lang rexx>/*REXX program
parse arg $ .
if $=='' then do; say "***error*** no filename was specified."; exit 13; end
q=stream($, 'C', "QUERY TIMESTAMP")
if q=='' then q="specified file doesn't exist."
say 'For file: ' $
say 'timestamp of last modification: ' q
/*stick a fork in it, we're all done. */
</lang>
'''output''' when using the file ID for this particular REXX program (source file): <tt> FILEMTIME.REX </tt>
<pre>
|