open(STATUS, "ipconfig |");

	while (<STATUS>) {
	      print $_;
	}
	close(STATUS);