open(INPIPE,"date|")$today1=<INPIPE>;$today2=<INPIPE>;管道缓冲当中的内容被只能被读取一次是吧。

初学者写了一个程序，找出相乘等于140的整数，出来的结果有重复，例如2x70=140,70x2=140.怎样去掉这样重复的结果，请教高手。#!/usr/bin/perlfor($a=0;$a<100;$a++){  for($b=100;$b>-1;$b--){  if($a*$b==140){ &nb

本帖最后由kingwmj于2011-05-1519:13编辑在ubuntu下运行perl程序，要往tmp目录中写入文件，但我在perl里运行出错。但如果我把运行命令打印成.sh文件，然后用根目录命令运行，就没有问题。请问这是不是文件写权限的问题？该怎么解决？

抢个首发拖拖拉拉的总算抓住了春天的尾巴，感兴趣的同学研究下哈

hi，大家好。在用C++写CGI代码时，遇到一个中文比较的问题，是这样的：前台统一用utf8编码，那么传到CGI时，原字符串肯定还是UTF8编码，比如传过来的是一个"否"字，用变量not保存。那我在写代码时肯定不能用if(not=="否")来判断，因为"否“的编码可能不是utf8，这样就会出错，有什么办法不？网上查了下，发现有人用url编码的方式来判断，比如:http://

要学学习perl的面向对象知识看哪一本书好一些？大骆驼书看着不太好。

$a=log($b)里面log的底数是2还是10，或者还是e呢？小弟才疏学浅，下载的书上没有找到，望各位指教..

我的读一个程序的时候，看到一行代码是这样的if(/^+([0-9.-]+)+([0-9.-]+)+([0-9.-]+)/)请问([0-9.-]中的第二个减号-代表什么意思？

如有文本aa1111bbDDDDDDD.......cc1111ddAAAAAAAA

foreach$e(@a,@b){$union{$e}++&&$isect{$e}++}复制代码不明白地方是＠a和@b是如何赋值给$e的，它们的先后顺利是怎么的？