perl - Perl で許可が拒否される問題 - 解決策が必要

Question

Perl を使用してディレクトリを作成する際に問題があります。

$country = 7;
$city = 12;   
$uploadFolder = "/opt/v-hosts/user/html/images/h_photos/ls";
$destination = $uploadFolder;
mkdir($destination) if(!-e $destination);
$destination .= "/$country";
mkdir($destination,0755) if(!-e $destination);
$destination .= "/$city";
mkdir($destination,0755) if(!-e $destination);

このコードを実行しようとすると、次のディレクトリが作成されます。

/opt/v-hosts/user/html/images/h_photos/ls/7/12

残念ながら、コードはエラーを返します。

mkdir /opt/v-hosts/user/html/images/h_photos/ls/7: /opt/v-hosts/user/epbin/ls.cgi 行 1376 で許可が拒否されました。\n

lsファイルのパーミッションを777に変更しようとしましたが、問題は解決しませんでした。