△▲ WebProg 初心者の質問 Part13 ▼▽

[0241 nobodyさん 2006/03/07(火) 20:44:29 ID:???]

while (<OUT>) {
chomp;
exit if $_ eq $host;
}
print OUT $host, "\n";