Re^2: Code from PHP to Perl

[Anonymous Monk]

<?php
  $ch = curl_init('https://www.googdle.com');

curl_setopt($ch, CURLOPT_FAILONERROR, true);
curl_setopt($ch, CURLOPT_NOBODY, true);

if (curl_exec($ch) === false) {
    echo 'Curl error: ' . curl_error($ch);
}
else
{
    echo 'Operation completed without any errors';
}


curl_close($ch);
?>