perl正则表达式实现大写字母转小写字母

　　这个功能不难，但是要求必须用s///的形式，而且后面不能加第三个参数，不能是s///g这样的形式。
　　不过可以采用多个这样的表达式。
　　例如
　　s/A/a/
　　s/B/b/
　　s/AB/ab/
　　.........
　　.......
　　最终就是要求所有这些表达式组合起来，使得不论输入多少个大写字符，都会被转化为小写。
　　我在atftpd的pcre功能中需要我将大写的请求文件转化为小写，所以需要一个rules文件。
　　下面是pcre的rules的说明
　　The left hand side is the expression to match, the right hand side is the
　　substitution. This is equivalent to perls s/// statement
　　没学过perl,稍微看了一下perl的表达式说明，没想到方法......
　　这个功能能实现吗？
　　D:\>echo hello | perl -plne "s/.*/\U$&/g"
　　HELLO
　　D:\>