WEB相談室

Webページ作成に関しての何でも掲示板です。

タイトル:Perlにてテキストエリアの内容をファイルに保存して、再度出力する方法について

0:[投稿] sand [MAIL] [2002/12/29 02:12 ][環境:win2000 UNIX]

初めて投稿するsandと申します。
perlにてお聞きしたいのですが、

perlにて、テキストエリアに入力した文字を
open(SV,"a");
print SV $textarea;
close(SV);
上記にてファイルに保存して、そのファイルの内容を
open(LD,"a");
@data = <LD>;
close(LD);

foreach $temp (@data)
{
print "$temp\n"
}
という感じで出力すると、

ファイルの内容が
[a]
-------------------
aaa
bbb
ccc
-------------------

の場合、
aaa

bbb

ccc

というように、改行が増えてしまうのですが、解決策
はないでしょうか?

よろしくお願いします。
(足りない点がありましたらご指摘ください)


1:[回答] ふじ [URL] [2002/12/29 02:41 ]

改行が増えるのは、
> print "$temp\n"
ここで \n を追加しているから。

print $temp;

だけでいいでしょう。


2:[回答] akuro [2002/12/29 14:40 ]

ふじさん返信ありがとうございました。

>ここで \n を追加しているから。

すみません、自分で改行コードをいれていたなんて、まぬけ
すぎました。
いつも改行を最後に書き込んでいたので、ついやってしまい
ました。

このような質問に対して解説してください、本当にありがとう
ございました。


3:[回答] akuro [2002/12/29 14:45 ]

あ!!

一番最初の質問の名前がsandとなっていますが、akuroでした。
すみませんでした。

sand⇒akuroの間違いです。

回答(必須): 状態:

お名前(必須):

e-mail:

URL:




[戻る]

ChaichanPAPA's World