get_clean_sql function

Get a cleaned SQL script into R