パスからファイル名を取り出すには?
ファイルのアップロードの際、パスからファイル名のみを取り出そうと思ったのですが、Shift-JISの、エスケープ文字（日本語のファイル名の場合）の関係で困ってます。
具体的には
$path = "C:\\temp\\表\示.txt";
という$pathから、
表示.txt
のみを取り出したいということです。
$path =~ tr/\\/\//;
$path = substr($path,rindex($path,"/")+1);
や
use File::Basename;
$path = fileparse($path);
などなど、いろいろやってみたのですが、
示.txt
となるものしか見つかりませんでした…
速度や環境依存の関係のため、モジュールや、外部スクリプト、正規表現はあまり使いたくないのですが、何か良い案はないでしょうか?
お礼
ありがとうございます。 助かりました。 ZWCADにもそのような印刷スタンプがあります。