RosettaCodeData/Task/File-size/M2000-Interpreter/file-size-2.m2000

10 lines
227 B
Plaintext

Module ShowFileSize(filename as string) {
if exist(filename) then
print filename+" has size "+(filelen(filename))+" bytes"
else
print filename+ " not exist"
end if
}
ShowFileSize "checkthis.txt"
ShowFileSize "c:\ok.txt"