Question

Perl语言写程序时怎么换到下一行打？

windows用户一般都是用这个吧？

Answer 1

#/usr/bin/perl

open (IN, 'D:\\words.txt ') || die $!;
@words=();
close IN;
open (OUT,'>','D:\\wordlist.txt')or die $!;
foreach $line(@words){
$line=~s/\n//g;
@words=split /\s+/,$line;
foreach $word(@words){
$word=~s/\W+//;
$freq {$word}++;
print OUT $word ."=>". $freq{$word}."\n";
}
}

close OUT;
你试一下这个程序，文件可以不用每行一个单词，直接读取原文本就好！有问题再交流！

追问

我是新手，打程序换行是用空格吧？

追答

是的 有空多练习

追问

请问这是怎么回事？