LinuxSir.cn,穿越时空的Linuxsir!

 找回密码
 注册
搜索
热搜: shell linux mysql
查看: 2334|回复: 4

Perl怎么做文件名转化.

[复制链接]
发表于 2008-1-17 21:45:09 | 显示全部楼层 |阅读模式
file:///mnt/music/%D5%C5%D1%A7%D3%D1/%CD%FC%BC%C7%C4%E3%CE%D2%D7%F6%B2%BB%B5%BD.mp3
怎么把%xx转成相应的字.
 楼主| 发表于 2008-1-19 21:54:44 | 显示全部楼层
解决了:
s/(%)(..)/chr (oct "0x".$2)/ge
回复 支持 反对

使用道具 举报

发表于 2008-1-20 08:58:33 | 显示全部楼层
$ cat urlencode
#!/usr/bin/perl -w

use URI::Escape;

print URI::Escape::uri_escape("$ARGV[0]"),"\n";

$ cat urldecode
#!/usr/bin/perl -w

use URI::Escape;

print URI::Escape::uri_unescape("$ARGV[0]"),"\n";
回复 支持 反对

使用道具 举报

 楼主| 发表于 2008-1-20 10:10:15 | 显示全部楼层
URI::Escape
要另外装啊?
机器里没有.
回复 支持 反对

使用道具 举报

发表于 2008-2-18 11:23:13 | 显示全部楼层
URI::Escape到cpan上装就行了
回复 支持 反对

使用道具 举报

您需要登录后才可以回帖 登录 | 注册

本版积分规则

快速回复 返回顶部 返回列表