# Upload file to a file storage
writeLines("this is an example", "example.txt")
folder <- withr::local_tempdir()
cnt <- connector_fs(folder)
cnt |>
list_content_cnt(pattern = "example.txt")
cnt |>
upload_cnt("example.txt")
cnt |>
list_content_cnt(pattern = "example.txt")
cnt |>
remove_cnt("example.txt")
file.remove("example.txt")
Run the code above in your browser using DataLab