Truncate a file: Difference between revisions
no edit summary
m (→{{header|REXX}}: changed/added comments and whitespace.) |
No edit summary |
||
Line 853:
ser: say '***error***' arg(1); exit 13 /*display an error message and exit. */</lang>
'''output''' is identical to the 1<sup>st</sup> REXX version. <br><br>
=={{header|Ring}}==
<lang ring>
file = "C:\Ring\ReadMe.txt"
fp = read(file)
fpstr = left(fp, 100)
see fpstr + nl
write(file, fpstr)
</lang>
Output:
<pre>
The Ring Programming Language
http://ring-lang.net/
Version 1.0
Release Date : January 25, 2016
</pre>
=={{header|Ruby}}==
| |||