begin
    declare file, md5, path
    let file = ''
    let md5 = ''
    let path = field(@arg, @fm, 2)
    part 1
    invoke file&get(path, file)
    part 2
    invoke hash&MD5(file, md5)
    echonl 'MD5 => ':md5
except
    if @part = 1 then
        echonl 'Cannot open file ':path
    endif
end