Update ex_checkInternet.R