会python真的可以为所欲为0(回)
353天前
这里还有人吗1(回)
538天前这里还有人吗0(回)
538天前
每天面对着电脑屏幕，敲打键盘。我所面对的并不只是代码，而是一种生活方式。0(回)
763天前到处都是羊，不想上班0(回)
843天前
鸽子
0(回)
847天前#----------------------------- |
if ($var =~ /^[A-Za-z]+$/) { |
# it is purely alphabetic |
} |
#----------------------------- |
use locale; |
if ($var =~ /^[^\W\d_]+$/) { |
print "var is purely alphabetic\n"; |
} |
#----------------------------- |
use locale; |
use POSIX 'locale_h'; |
# the following locale string might be different on your system |
unless (setlocale(LC_ALL, "fr_CA.ISO8859-1")) { |
die "couldn't set locale to French Canadian\n"; |
} |
while (<DATA>) { |
chomp; |
if (/^[^\W\d_]+$/) { |
print "$_: alphabetic\n"; |
} else { |
print "$_: line noise\n"; |
} |
} |
