A 回答 (4件)
- 最新から表示
- 回答順に表示
No.3
- 回答日時:
「入力ファイルに変化が見られませんでした」というのはどういうこと? そのプログラムだと入力ファイルとは別に出力ファイルがあってそっ
ちに書き出してるから, 「入力ファイル」自体は変化しないよ.
この回答へのお礼
お礼日時:2023/01/28 20:40
申し訳ございません。出力ファイルと文章と、入力ファイルの文章を比べたときに、変化がなかったことを書こうとしていました。期待した処理がされずに出力ファイルに書き出しされていました
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Excel(エクセル) Vba エクセルマクロで、 A列の、A1セルからA10セルに空白のある行を削除する、のは Range 3 2022/11/05 17:44
- Excel(エクセル) Excelについて質問です(ver2019) 1 2023/06/30 21:20
- Perl perlについての質問 1 2022/10/01 15:38
- Visual Basic(VBA) vbaエクセルマクロについて sheet1のA列が空白の場合、行を削除(一番下の最終行まで)するプロ 3 2023/03/03 17:41
- Word(ワード) Wordに詳しい方教えてください 左上から文字を入力したいのですが、どうしてもこのように上と左右に空 2 2022/09/27 01:22
- Perl perlについて 2 2022/11/18 19:38
- その他(プログラミング・Web制作) プログラミングの問題です。プログラミングの空白に入るのは写真の通りであってますか?間違ってたらどこを 2 2022/06/18 22:31
- Visual Basic(VBA) EXCEL VBAでA列にある空白行より下の行すべてを削除する方法を教えてください。 3 2023/02/17 07:02
- Perl Windows10においての『Perl』のプログラムについて 1 2022/05/09 16:04
- Visual Basic(VBA) エクセルVBAで『A列』に新規で数値を入力し『B列』から右方向の空白セルにその値を貼り付ける方法 4 2022/11/05 08:37
このQ&Aを見た人はこんなQ&Aも見ています
関連するカテゴリからQ&Aを探す
おすすめ情報
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
INDIRECT 横に再度抽出したい
-
Perlで、「が」を、「...
-
テキストファイルで提出とは?
-
このファイルを開く方法で困っ...
-
画像が表示でnull; this.src
-
P.Cのシングルチューナーとダブ...
-
openした後、closeしないでプロ...
-
Perlで時間の計算
-
Perlで特定文字列から特定文字...
-
Perlで一定値以上の場合にデー...
-
アルファベットに付いて質問し...
-
#!/usr/bin/perlで書きだしたCG...
-
Perlのエラーについてご教授く...
-
perlのflock関数でロックをかけ...
-
AI sisterとは、偽物の人ですか?
-
bashスクリプト
-
ファイルアイコンの左下に緑の□...
-
perlプログラミング 空白行削除
-
perlでリテラル値はメモリにど...
-
perlで2次元配列をサブルーチ...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
perlプログラミング 空白行削除
-
Perlでの複数行にわたるコメント
-
ワイルドカードの処理(win/dos)
-
Perl言語でファイル入出力プロ...
-
Sys::Syslogモジュールを利用し...
-
ポインター引数の関数でコンパ...
-
10Mバイトて文字数に すると何...
-
UTF-8で5~6バイトになる文字コ...
-
char str[256]の256の意味は?
-
エクセルシート名の制限を変更...
-
DataGridViewの特定列に入力さ...
-
COBOLのCOMP形式について
-
「1TB」のHDDに日本語は何字入...
-
Excel VBA メール作成について ...
-
stable diffusionのエラー
-
Excel 1セル当りの文字数が2...
-
バイナリとBCDコード
-
ビットスワップとバイトスワッ...
-
ピクセル,dpiから容量(バイト...
-
バイト列とバイナリ列の違いが...
おすすめ情報
open(IN, "$ARGV[0]") || die;
#出力ファイル名はコマンドラインから受け取る
open(OUT, "> $ARGV[1]") || die;
while (my $line = <IN>) {
#空白行でない場合だけ出力ファイルに書き出す
if ($line !~ /^\s*$/) {
print OUT $line;
}
}
close IN;
close OUT;
このプログラムでは、入力ファイルに変化が見られませんでした。アドバイスお願いいたします
申し訳ございません。
出力ファイルの文章と、入力ファイルを比べたときに、変化がなかったと書こうとしていました。
期待した処理がされずに、出力ファイルに書き出しされていました。