Added prep_sql_file function

Added a function I use to parse full SQL files.  Takes a raw SQL file, removes "--" comments, and reduces into 1 line, so that it can be fed into the run_query() function.
```r
sql <- gsub("[[:space:]]+", " ", sql)
```