鉴于最近Perl版的风气，我决定正式退出Perl版块

MMMIX

py 发表于 2014-05-23 07:27
这就是我说的“没有原则没有是非观”，以任何自认为恰当的理由纵容不良风气。

别人不认同你的标准，就是没有原则没有是非观了？这个是不是太自以为是了点？

当然，一个论坛（邮件列表，等等）可以规定不允许参与者帮助伸手党（不论出于什么理由），这是规则制定者的权力，没有什么问题。

Monox

回复 23# jason680


    嗯，当初的帖子我确实是有问无回，不过就像我上面所说的，那是因为我当时（现在仍然）认为我的那个帖子并没有得到充足的回复，那个帖子在当时算是没有解决，然后又没多少人对那个帖子感兴趣。自然，我知道哪个帖子的背后的真正答案的时候已经是很久以后的事了，自然不会去原帖说问题已解决，因为原帖早就沉到不知哪里去了，我没有挖坟的习惯。
  当然，你可以说我上面是在找借口，不过，其实我说的所有的话都可以算是找借口，足够的借口一起就成了理由，于是我才可以正式退出Perl版块。
  不过，另一方面，我本来就不擅长与人打交道，我知道我自己在很多礼仪方面做得肯定没有平常人好，所以我自己也可以理解别人的有问无回。我回复的那么多个帖子中就有很多是有问无回的，对我各人来说，我觉得这个是可以接受的，但是我一楼提到的“无礼人”的“无礼”根本就不是这种礼仪做得不够这种程度，而是从心底里透露出的敌意和不敬。
  当然，我所针对的“无礼”之人也仍然有很多热心网友帮他回复问题，一来，我认为那个“无礼”人的敌意只针对我个人，因为我虽然不喜欢他的表达语气和其他什么，还是出于好心有提示一下他问题可能的原因，回复他的时候自然语气不会特别客气，我没必要奉承任何人，但是虽然我的语气强硬一点，他接受不了可以无视，不过他满怀敌意的中伤和不敬来对我好心的提示我肯定是不可以接受的。二来，我在这方面比其他人更敏感一些，可能其他网友任何他的言语并没有那么过分。
  当然，我如果只因为一个人的言论就说要退出Perl版块会显得比较孩子气。不过，一方面我确实一直很孩子气，另一方面，我退出Perl版块的原因本来就是多样的，某些人的言论只是一个导火线而已。所以的原因总结起来，就是我和这里的环境格格不入，所以没必要留在这里。
  不管是希望或许会有人反思一下现在这里的氛围，还是纯粹比较无聊，反正我在走之前留下了这个帖子。这个帖子也终将如我的第一次提问帖一样石沉大海，淹没在伸手党和其他党的海量帖子当中。

perllover007

我是新手，本来没有太多话语权，只是从新手角度发表一下看法。
对于新手尤其是想学习的新手，获取代码可以算是捷径。不知道大家是否有同感。现在Perl包的确很多，但是对包的功能的介绍多是概括的，对于入门的新手来说，读懂好像是比较吃力的，更不要说还有语言问题。
个人认为，编程就是在不断修改代码和写代码的基础上取得进步的，闭门造车不仅苦恼，还会浪费很多无用功。不知道现在的高手们当初有没有自己痛苦的摸索过？有没有过想找人指点一下迷津呢？
对于版主所说伸手党的礼貌问题，我觉得没有必要为这个伤神。因为年代不同，时代不同，所以对礼貌的看法不同。对于新时代的年轻人，他们可能不太习惯说谢谢之类的话，不一定代表没有礼貌，这个是时代问题，不是他们的问题（还是个人观点）。对于没有礼貌的人，更没有必要伤神了，因为你的素质和他不在一个层次。
以上内容纯属个人观点，不赞同的可以忽略！感谢您的阅读！

stanley_tam

多谢方丈指点{:3_203:}
宠辱不惊，看庭前花开花落；去留无意，望天上云卷云舒

MMMIX

Monox 发表于 2014-05-23 10:00

嗯，当初的帖子我确实是有问无回，不过就像我上面所说的，那是因为我当时（现在仍然）认为我的那个帖子并没有得到充足的回复，那个帖子在当时算是没有解决，然后又没多少人对那个帖子感兴趣。

我觉得，你在那个帖子中真正的问题是对别人的回复没有任何回应。你认为别人没有给出充足的回复，可是你也没有告诉别人什么地方回复的不充足？看不明白别人的回复，或者认为别人的回复没有解决你的问题，你要说出来，别人才好进一步的解释，或者其他人才能提供另外的解释/解答，可是你啥都不说，别人怎么知道你没看明白？

你在那帖子中的表现让别人一看，只会给人留下这种印象：这哥们提问了，别人也解释，可他问完了就直接消失了，完全没有下文了，这整个一没礼貌的伸手党嘛。

MMMIX

perllover007 发表于 2014-05-23 10:05
对于新手尤其是想学习的新手，获取代码可以算是捷径。

从让别人帮你完成作业、工作的角度来说，直接获取代码当然是捷径，这和是不是新手没有关系，对老手来说这也是捷径。

直接让别人给代码的问题在于，你想让别人完成本该你完成的事情。这种提问的态度从根上就错了，这也是许多人如此厌恶伸手党的原因（之一）。

提问之前你首先要明确一点：这个问题是我自己要解决的问题。所以，在你就这个问题向别人求助时，你应该
1、清楚的描述问题本身
2、展示你为了解决这个问题做了什么努力
3、在你试图解决这个问题的过程中碰到了什么困难需要别人帮助

jason680

回复 30# MMMIX

Great job!!!

>>提问之前你首先要明确一点：这个问题是我自己要解决的问题。所以，在你就这个问题向别人求助时，你应该
>>1、清楚的描述问题本身
>>2、展示你为了解决这个问题做了什么努力
>>3、在你试图解决这个问题的过程中碰到了什么困难需要别人帮助
   

perllover007

赞同！有个问题可以请教吗？

能否帮忙检查一下这个代码啊？先谢了！

这段代码为了实现操作两个文本，通过检索关键词在表格相邻两行显示搜索到的英汉语对应的句子，但是结果不理想，请问什么原因？麻烦给诊断一下，谢谢！
use strict;
use warnings;
use UTF8;
use Win32::GUI qw(DT_RIGHT DT_LEFT DT_CENTER DT_VCENTER);
use Win32::GUI::Grid qw(GVS_DATA);
my $main = Win32::GUI::Window->new(
-name => ‘Main’,
-title => “arallel Corpus”,
-pos => [ 0, 0 ],
-size => [ 1200, 840 ],
);

$main->AddLabel(
-text => “lease fill the search word in the following blank”,
-top => 20,
-align => ‘center’,
-left => 35,
width => 300,
height => 30,
);
my $f1=$main->AddTextfield(
-name => “searchword”,
-align => ‘center’,
-left => 20,
-top => 60,
-width => 160,
-height => 30,
);

$main->AddButton(
-name => “search”,
-text => “GO”,
-pos => [ 190, 60 ],
-width => 110,
-height => 30,
-ok => 1,
);

my $grid=$main->AddGrid(
-name => ‘grid’,
-left => 20,
-top => 90,
-width => 1120,
-height => 560,
-rows => 1,
-columns => 2,
-fixedrows => 1,
);
$grid->SetRows(1);
$grid->SetCellText(0, 0, ‘No.’);
$grid->SetCellFormat(0, 1, DT_CENTER);
$grid->SetCellText(0, 1, ‘Result’);

$grid->SetColumnWidth(0, 50);
$grid->SetListMode();
$grid->SetFixedColumnSelection(0);

$main->Show();
Win32::GUI:ialog();
exit(0);
sub search_Click{
open(ZH,”ZH.txt”;
my @zh= ;
chomp(@zh);
open(EN,”EN.txt”;
my @en= ;
chomp(@en);
close ZH;
close EN;
foreach my $i(0..$#zh){
my $j=$i+1;
my %match;
$match{$zh[$i]}=$en[$i];
my $node = $main->searchword->Text();
if ( $en[$i] =~ /$node/i)

{

my $row = $grid->GetRows();
$grid->InsertRow(-1);
$grid->SetCellText($j, 0, $j);
$grid->SetCellText($j, 1, $en[$i]);

$grid->InsertRow(-2);
$grid->SetCellText($j, 0, $j);
$grid->SetCellText($j, 1, $zh[$i]);

}





回复 30# MMMIX


   

Monox

真欢乐，这个楼越歪越厉害了，而且我还被委婉的说成是伸手党了。
不过，不管我（曾经）是不是伸手党，我还是那个观点，我并不讨厌伸手党。再加上一点补充，不管有没有人说我是伸手党，我都努力不去做伸手党。
结论，我要弃楼了。
正式完全从Perl版退出，给我的回帖我也不会回应了。
至于是否弃CU，或者什么时候弃CU，这就是我的私事了，我并不打算像这楼一样给出什么交代。
祝各位Perler不管是留下的，还是终究要走的，都能得到自己想要的。Goodbye every Perler of CU.

sjdy521

人不能太把别人当回事，也不能太把自己当回事，走好