Ubuntu中文论坛

发表于： **2008-03-25 16:14**

建议单独设立perl板块

我们都是新人，我是因为工作需要，感觉perl的强大，才转到ubuntu桌面系统又安全

大家学习perl的都应该交流交流从基础学起

因为perl是有未来的，我深信不疑！

发表于： **2008-03-25 16:18**

学python吧。比perl可爱阿。呵呵

发表于： **2008-03-25 17:47**

因为没什么人气，所以都并在一起。

发表于： **2008-03-25 20:17**

是罗。少人的。
py可爱什么哦。perl牛皮多了。

发表于： **2008-03-26 0:08**

eexpress 写了：。
perl牛皮多了。

真的？

发表于： **2008-03-27 12:45**

本人在处理文本文件

取相关字符时，想去掉字符左右2边的空格然后赋值给变量，怎么取？

什么函数可以去掉左右空格？

发表于： **2008-03-27 12:47**

m/\s*(.*\S)\s*/
取 $1

发表于： **2008-03-27 13:20**

$line=" 0 ";
$line=m/\s*(.*\S)\s*/;

取$1好像不对啊

发表于： **2008-03-27 13:24**

m/\s*(\S\S*)\s*/
这样呢？

发表于： **2008-03-27 13:25**

miczhang 写了：$line=" 0 ";
$line=m/\s*(.*\S)\s*/;

取$1好像不对啊

... 是
$line=~m/\s*(.*\S)\s*/;

你不会perl?

发表于： **2008-03-27 14:05**

ok了

正则表达式感觉有点复杂

漏了～

呵呵现在好了谢谢！

本人刚学习perl，处理文本功能很强，所以喜欢

发表于： **2008-03-27 14:09**

用正则表大事怎么把“080313121750”

化为以下格式：

“2008-03-13 12:17:50"

请赐教！

发表于： **2008-03-27 14:29**

代码：全选

$line="080313121750";
$line=~s/(\d{2})(\d{2})(\d{2})(\d{2})(\d{2})(\d{2})/20\1-\2-\3 \4:\5:\6/;
print $line;

这个正则好丑。。。看得眼花。

发表于： **2008-03-27 14:49**

呵呵强的

果然可以的

perl的强大，伙伴们的强大啊

xx一跃不及千里
驽马十驾功在不舍

xx 2 个字打不出来，不知道有人支持吗？

发表于： **2008-04-04 20:51**

似乎是要 /^\s*(.*\S)\s*$/

关于单独设立perl板块的建议