關(guān)于學(xué)習(xí)Perl[獻(xiàn)給新手，仙子原創(chuàng)]

keepinmind

flw 發(fā)表于 2005-11-05 22:36
只要你喜歡就好！
下回想要什么顏色，告訴我，我給你設(shè)！

看看flw那熊樣，好色無厭

還有江湖小輩稱他大神，奉勸小輩們，個人崇拜，后患無窮，獨(dú)立思考是安身立命之本。

apkood

仙子：好！
     下面這段代碼是你給一個cu友寫的，正好我可以派上用處，有個地方要修改一下，讓它把輸出結(jié)果保存為一個txt文檔。謝謝！

#!/usr/bin/perl

use strict;

open T1, "1.txt" or die "$!";
open T2, "2.txt" or die "$!";
my %diff;

while (<T2>)
{
    $diff{$_}=1;
}

while (<T1>)
{
    print unless $diff{$_};
}

close T2;
close T1;

jiang870320

蘭花姐姐，多謝。

gly896420885

頂lz，給人方向上的指導(dǎo)

rubyish

蘭花 == 仙子

方兆國兒

精品文章

yeulang

非常感謝！

yizuwei520

特別想問一下，perl能夠?qū)崿F(xiàn)某產(chǎn)品的網(wǎng)購系統(tǒng)嗎？如果實(shí)現(xiàn)不了還需要掌握什么語言呢？