R/get_local_windows_ip.R

Defines functions get_local_windows_ip

get_local_windows_ip <- function(){
  x <- system("ipconfig", intern=TRUE)
  x <- removeBrancos(unlist(strsplit(x[grep("IPv4", x)], ":"))[2])
  x
}
leandromarino/CesgTools documentation built on May 25, 2022, 5:03 a.m.