1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 |
--example 1 set theFile to (choose file with prompt "Select a file to read:" of type {"TEXT"}) open for access theFile set fileContents to (read theFile) close access theFile --example 2 on readFile( unixPath ) set foo to (open for access (POSIX file unixPath )) set txt to (read foo for (get eof foo)) close access foo return txt end readFile --example 3 UTF-16 on readFile( unixPath ) set foo to (open for access (POSIX file unixPath )) set txt to (read foo for (get eof foo) as Unicode text) close access foo return txt end readFile --example 4 UTF-8 on readFile( unixPath ) set foo to (open for access (POSIX file unixPath )) set txt to (read foo for (get eof foo) as «class utf8») close access foo return txt end readFile --example 5 with terminal on readFile( unixPath ) return (do shell script "cat '" & unixPath & "'") end |