Check if an argument looks like an S3 bucket
check_s3_uri(x)
check_s3_uri('s3://foo/bar')
#> [1] TRUE
check_s3_uri('https://foo/bar')
#> [1] "Does not seem to be an S3 URI as per regular expression: '^s3://[a-z0-9][a-z0-9\\.-]+[a-z0-9](/(.*)?)?$'"
if (FALSE) { # \dontrun{
assert_s3_uri('https://foo/bar')
} # }