Perl写的学英语的小工具
http://www.zitec.com.cn/cgi-bin/longman/longman.pl从以前的程序堆里整理出来的。有次下了N多LONGMAN的英文句子，有文字和语音对应，就想写段代码组织一下这些句子，以便学习。大概花了一天编写，半天调试除错，就弄完了。不过一直没认真学，英语还是很差实际上，这个程序可以写成GUI桌面应用，那样用起来会更方便，等有兴致再写吧。Perl正如它
作者: iamlimeng 发布时间: 07-18
File::Find 怎么排序
windows系统下想对100+个文件夹重命名按时间顺序在文件夹名字前加序号如文件夹1文件夹2... 重命名后001文件夹1 002文件夹2用File::Find不知怎样按时间排序或者有其他什么办法
作者: summerfall0 发布时间: 07-18
有可能让perl中的变量必须声明么？
刚刚面试，出道题把我难住了啊怎么样使得perl当中的变量必须先显式声明才能引用？我想了想，感觉不可能只好说不会
作者: nightcherry1984 发布时间: 07-18
大家帮忙看看这两段程序
print"whichdirectory?\n";chomp(my$dir=<>;if($dir=~/^\s*$/){ chdirordie"Can'tchdirtoyourhomedirectory!";}else{ chdir$dirordie"can'tchangeto$d
作者: stesting 发布时间: 07-18
怎么取得所要的字符？
比方说 $JOB是个未知的字符串但是格式是统一的例如（2SE0123AO 2SE0126AO 2SE0324AO 4SE0512AO.
作者: nicaijin 发布时间: 07-18
hash排序
本帖最后由linux68于2011-07-1811:57编辑一个hash表，%hash=('a'=>2,'b'=>3,'c'=>1);相对其按值倒序排，得到%hash=('b'=>3,'a'=>2,'c'=>1);或是得到一个这样的数组。perl里怎么实现，谢谢！
作者: linux68 发布时间: 07-18
请教TKX进度条不刷新的问题
假设创建进度条时将“-variable”的值设置为变量$progress_num，我想在后面的FOR循环里改变$progress_num的值，就是每循环一次，$progress_num的值加1，但是FOR循环执行的过程中进度条没变化，等FOR循环执行完毕后，进度条才有刷新。这个问题怎么解决啊，请专家指点，不胜感激
作者: yuyuau 发布时间: 07-18
数组输出到excel
我想把一个数组输出到excel的第一行，可是每次输出的结果只占了第一行的第一列@array={'id','name','address','age'，'number'};$work_sheet->write('A1',@array);请问怎么能正常输出，使其占据五列。要是把数组转成列表怎么转呢？谢谢了，本人刚开始使用perl。
作者: linux68 发布时间: 07-18