if (FALSE) {
filename = system.file("tests", "amazon3.R", package = "RCurl")
f = CFILE(filename)
if(url.exists('http://s3.amazonaws.com/'))
curlPerform(url = "http://s3.amazonaws.com/RRupload/duncan2",
upload = TRUE,
readdata = f@ref,
infilesize = file.info(filename)[1, "size"])
}
Run the code above in your browser using DataLab