
结论 仅仅是文件句柄和输出内容的分割符合
#!/usr/bin/perl -w
open (OUTPUT, ">1.txt")
$aaa = '123'
# print OUTPUT $aaa +1
$aa=$aaa +1
$aa2=$aaa+1
print "$aaa+1\t$aa\t$aa2"
print "$aaa +1\t$aa\t$aa2"
print $aaa +1
print $aaa+1
print OUTPUT $aaa+1
print OUTPUT $aaa +1
close (OUTPUT)
原版:#!/usr/租饥胡bin/perl
$str
=
"肢碧my
name
=
kitty"
$str
=~
s/\s//g
#-----全局替换空格为空
$str
结果:myname=kitty
改进版:
#!/usr/bin/perl
$str
=
"my
name
=
kitty"
$str
=~
s/\s\s+//g
#-----全局替换2个弊拦以上的空格为空
$str
结果:my
name=kitty
s///是替换\s是匹配空格
g是替换所有
加上 s 后,可以让 ‘哗羡.’ 匹亏芦橡配换行符,把$Dir当作销旁单行。
整句的意思就是删除所有空格。
欢迎分享,转载请注明来源:内存溢出
微信扫一扫
支付宝扫一扫
评论列表(0条)