Chinaunix

标题: 小写改大写的问题？ [打印本页]

---

作者: nicaijin    时间: 2011-07-25 19:09
标题: 小写改大写的问题？

1. #!/usr/bin/perl
   
2. $JOB = 2se2314ao;
   
3. print;

复制代码

我要打印出来的$JOB为大写的  即为“2SE2314AO”

贴上代码 便于了解  谢谢 ~~~

---

作者: 兰花仙子    时间: 2011-07-25 19:58
uc()不可以么

---

作者: seufy88    时间: 2011-07-26 08:23
$JOB=~s/(\w+)/\U$1/;

---

作者: nicaijin    时间: 2011-07-26 09:46
还是没有看懂能不能大侠都贴上代码，  我新手~~

---

作者: 最爱在深秋    时间: 2011-07-27 11:56
echo "2se2314ao" | tr "[a-z]" "[A-Z]"

---

作者: 最爱在深秋    时间: 2011-07-27 13:20
#!/usr/bin/perl
use strict;
my $JOB;
$JOB= 2se2314ao;
$JOB=~ tr/a-z/A-Z/;
print "$JOB\n";

---

作者: minirain    时间: 2011-08-22 14:42


$JOB = uc("2se2314ao");

---

欢迎光临 Chinaunix (http://bbs.chinaunix.net/)

Powered by Discuz! X3.2