use LWP::Simple;

if (head($host)) {
  # $host returned data
} else {
  # $host didn't return data
}