# Download file from a file storage
folder <- withr::local_tempdir()
cnt <- connector_fs(folder)
cnt |>
write_cnt("this is an example", "example.txt")
list.files(pattern = "example.txt")
cnt |>
download_cnt("example.txt")
list.files(pattern = "example.txt")
readLines("example.txt")
cnt |>
remove_cnt("example.txt")
Run the code above in your browser using DataLab