Chinaunix

标题: 如何定义所有字母+数字+特殊字符的变量? [打印本页]

作者: 小公猫    时间: 2017-07-16 22:37
标题: 如何定义所有字母+数字+特殊字符的变量?
像Python里面可以通过:
  1. letdig = string.digits + string.letters
复制代码
来表示数字+字母的组合

Perl里面要如何表示呢?除了最笨的办法:
  1. $letdig = '0123456789abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ';
复制代码



作者: jason680    时间: 2017-07-16 23:30
回复 1# 小公猫

How about this ...

$letdig = join("", 0..9, a..z, A..Z);

作者: 小公猫    时间: 2017-07-18 14:37
jason680 发表于 2017-07-16 23:30
回复 1# 小公猫

How about this ...

Wonderful





欢迎光临 Chinaunix (http://bbs.chinaunix.net/) Powered by Discuz! X3.2