ﾚｽありがとうございます。また、使用Perlは5.6.1です。
出力されるページ及びスクリプト自体はSJISなので、
EUC変換を行なってから下記のコードを追加しました。

# Perlメモの正規表現より「ASCII以外」の文字列がある場合
if ($path =~ /[\x8E\xA1-\xFE]/) {

　# 「ASCII以外」の文字列をエンコードする
　$path =~ s/([\x8E\xA1-\xFE])/'%'.unpack("H2", $1)/eg;

}

とりあえずはこの方法で解決できそうです。
即ﾚｽ感謝です。