<span> </span>:)顶一个先。<br><br><div class="gmail_quote">2008/5/7 陈学芹 <<a href="mailto:robbiecn@gmail.com">robbiecn@gmail.com</a>>:<br><blockquote class="gmail_quote" style="border-left: 1px solid rgb(204, 204, 204); margin: 0pt 0pt 0pt 0.8ex; padding-left: 1ex;">
2008/5/7 Shan Leiguang <<a href="mailto:shanleiguang@gmail.com">shanleiguang@gmail.com</a>>:<br>
<div class="Ih2E3d">><br>
><br>
> 写了个模块Pretty::Table,可以打印比较漂亮的格式对齐的文本表格,可用于生成文本报表或日志文件,请大家测试,欢迎反馈你的意见和建议。<br>
<br>
</div>作者的创意很好,有意思,测试了一下,test.pl 没有任何输出,修改了一下有输出,<br>
但有问题,在我的环境下<br>
<br>
1. 运行包中自带的test.pl<br>
$ perl test.pl<br>
输出ok的断言,没有表格,很奇怪<br>
1..7<br>
# Running under perl version 5.008008 for linux<br>
# Current time local: Wed May 7 22:28:51 2008<br>
# Current time GMT: Wed May 7 14:28:51 2008<br>
# Using Test.pm version 1.25<br>
ok 1<br>
ok 2<br>
ok 3<br>
ok 4<br>
ok 5<br>
ok 6<br>
ok 7<br>
<br>
2. 运行Pretty/Table.pm中的example,有输出两个表格<br>
<div class="Ih2E3d"> +-----------------------------------+<br>
| Contacts |<br>
+----+-------+--------+-----+-------+<br>
| id | name | sex | age | email |<br>
</div> +----+-------+--------+-----+-------+<br>
| 02 | jarry | male | 26 | |<br>
+----+-------+--------+-----+-------+<br>
| 02 | jarry | male | 26 | |<br>
+----+-------+--------+-----+-------+<br>
| 04 | marry | female | 26 | |<br>
+----+-------+--------+-----+-------+<br>
| 01 | tommy | male | 27 | |<br>
+----+-------+--------+-----+-------+<br>
*-------*-------*-------*--------*-------*<br>
| id | 02 | 02 | 04 | 01 |<br>
*-------*-------*-------*--------*-------*<br>
| name | jarry | jarry | marry | tommy |<br>
*-------*-------*-------*--------*-------*<br>
| sex | male | male | female | male |<br>
*-------*-------*-------*--------*-------*<br>
| age | 26 | 26 | 26 | 27 |<br>
*-------*-------*-------*--------*-------*<br>
| email | | | | |<br>
*-------*-------*-------*--------*-------*<br>
<br>
一个横排,一个竖排,但有问题,明明表格数据是<br>
<div class="Ih2E3d"> my $dr = [<br>
['id','name','sex','age','email'], #this is a row<br>
['01','tommy','male',27],<br>
['02','jarry','male',26],<br>
['03','shanleiguang',26,'shanleiguang@gmail.com'],<br>
];<br>
<br>
</div>shanleiguang这行却没有了,出现两行jarry,是不是<br>
<div class="Ih2E3d"> $pt->insert(['04','marry','female',26], 4);<br>
</div>这个插入接口有问题阿? 另外,<br>
['03','shanleiguang',26,'shanleiguang@gmail.com'],这个测试数据<br>
有印刷错误,第3列因为性别,而不是年龄.:)<br>
<br>
3.我把性别用中文"男"字替换时,排版就不整齐了.<br>
<br>
作者的idea不错,谢谢分享:)<br>
<font color="#888888"><br>
<br>
--<br>
/*<br>
*@author: chen xueqin<br>
*@email: <a href="mailto:robbiecn@gmail.com">robbiecn@gmail.com</a><br>
*@see: <a href="http://robbie.bokee.com" target="_blank">http://robbie.bokee.com</a><br>
*@see: <a href="http://groups.google.com/group/fzlug" target="_blank">http://groups.google.com/group/fzlug</a><br>
*@love: freedom,tux,open source<br>
*/<br>
</font><div><div></div><div class="Wj3C7c">_______________________________________________<br>
China-pm mailing list<br>
<a href="mailto:China-pm@pm.org">China-pm@pm.org</a><br>
<a href="http://mail.pm.org/mailman/listinfo/china-pm" target="_blank">http://mail.pm.org/mailman/listinfo/china-pm</a></div></div></blockquote></div><br>