use English;
...
if ($ERRNO =~ /denied/) { ... }