Rename a sequence of variable names in data frame

Question

I have 5 columns in a data frame and I would like to rename the variable names as Var1, Var2, Var3, Var4, Var5.

My current approach is not very convenient:

Answer 1

names(mydata)[1:100] <- paste("Var", 1:100, sep="")