- ベストアンサー
Perlで行をさかのぼって削除する方法を教えて下さい
thatsthatの回答
- thatsthat
- ベストアンサー率55% (15/27)
出力データをメモリ上にもつ以外の、 「さかのぼって行を削除する方法」に対する他の答えとして・・ 一旦、別ファイルに出力しておいて、 最後に別ファイルを元のファイル名にrenameする、 というのも分かりやすいです。 「A～Cの数字が一つでも違った場合、 ハッシュ(一つ前ではない方)から出力ファイルへ書き出す」 という感じですね。
関連するQ&A
- perlで、後ろの行を読んで、前の行に書き込むには?
perl初心者です。 後ろの行を読んで、戻って、指定の行に、書き込む方法が、よくわかりません。 下記のようなファイルを読み込んで ---------------------------- アルファベット= 1A 2B 3C アルファベット= 1A 2B アルファベット= 1A 2B 3C 4D 5E 6F ------------------------------ 下記のように、「アルファベット=」にアルファベットを入れるには、どうしたらいいでしょうか? ------------------------------ アルファベット=ABC 1A 2B 3C アルファベット=AB 1A 2B アルファベット=ABCDEF 1A 2B 3C 4D 5E 6F -------------------------------- よろしくお願い致します。
- 締切済み
- Perl
- 英字を含まない文字行を削除
英字を含まない文字行を削除 1491 1492 1493 1494 1495 1496 1497 1498 1499 149A 149B 149C 149D 149E 149F このような16進数が書かれたテキストファイルがあります。 149A 149B 149C 149D 149E 149F このように英字が含まれていない数字のみの行を削除する方法を教えてください。
- ベストアンサー
- その他([技術者向] コンピューター)
- perlでファイルの読み方
次のような入力ファイルがあったときに、EOFまでのデータを番号１+番号2別にファイルに出力したいのですが、どのようにするのがいいでしょうか？ できれば、入力したデータをハッシュか配列にいれてからデータを加工してファイルに出力したいと思っています。 入力ファイル 1.xxx 2.A EOF 1.xxx 2.B EOF 1.xxx 2.A EOF 1.www 2.B 出力ファイル ファイル1 1.xxx 2.A 1.xxx 2.A ファイル2 1.xxx 2.B ファイル3 1.www 2.B
- ベストアンサー
- Perl
- 行を指定して削除する方法PERL
ある文字を検索して、その行を含む＆1行前と2行後ろの行までを削除するスクリプトを書きたいのですが、上手くいきません。 検索して行番号を獲得して、 $rowという変数に入れました。 それをさらに $a :1行前 $b ：2行後ろの行番号に格納しました。 問題は削除するところが上手く行きません。 next if で $aから$bの行番号を削除して、と頼んでいるのですが、空のファイルに上書きされてしまいます。 お願いです。この方法で何が間違っているかを教えてください！ #!/opt/perl/5.8.0/bin/perl -w print "Content-type: text/html\n\n"; use CGI qw(:standard); use CGI::Carp qw/fatalsToBrowser/; $filename = "../XML/link.xml"; $new = "../XML/link.xsl"; open(FILE, $filename) or die "Can't open `$filename': $!"; while (<FILE>) { if($_ =~ /HRWeb/){ #print "$."; $row = $.; $a = $row-1; $b = $row+2; print "HRWeb delete rows $a through "; } } &delete ($a, $b); sub delete{ open( OLD, "< $filename" ); open( NEW, "> $new" ); while ( <OLD> ) { next if /$a/../$b/; # copy everything but $a through $b print NEW $_; }print "$a deleted $b"; close( OLD ); close( NEW ); rename( $filename, "$filename.orig" ); rename($new, $filename ); }
- ベストアンサー
- Perl
- エクセル削除行を別ファイルへ抽出
エクセル初心者のため、お教え下さい。 Ａファイル（1000行）より、行削除してＢファイル（800行）を別ファイルとして保存しました。 削除した200行のデータをＣファイルとして保存したいのですが、どうすれば良いでしょうか？ ちなみに、Ａファイル、Ｂファイルとも有ります。 どうぞよろしくお願いいたします。
- 締切済み
- デザイナー・クリエイティブ職
- FORTRAN ファイルの入出力の方法がわかりません
メインプログラムを main.dat 入力するファイルを input.txt とします。 input.txtファイル内は A 12 23 B 49 93 C 66 25 ・ ・ ・ と続いてるとします。（数字は同じ数ずつ並んでて、その間にアルファベットがある） この時、2行目～3行目（12と23）、5行目～6行目（49と93）、8行目～9行目（66,25）、・・・・、とそれぞれのアルファベットのグループの数字を読み込んで、別々の出力ファイルを作るにはどうすれば良いかわかりません。つまり ファイルA 12 23 ファイルB 49 93 ファイルC 66 25 ファイルD ・ ・ ・ とアルファベットのグループ毎にファイルを作りたいのです。 DO文だけでできるのか？また、IF文を使う必要があるのか？直接アクセス入力（ACCESS='DIRECT'）を使うのか？初心者でかなり調べたんですがよくわかりません。教えて頂けると幸いです。よろしくお願いします。 また、もしよろしければ、グループCのみの数字（66、25）だけを読み込んで、出力する場合についても教えてくれるとありがたいです。 （基本的なOPEN、READ、WRITE文の使い方はわかっています。）
- ベストアンサー
- その他（プログラミング・開発）
- マクロによる条件での行の入力と削除
初めまして、よろしくお願いします。 次のような二枚のシートがあります シート１ Ａ Ｂ Ｃ １ ２ ・ ９９ １００ ２３ １０１ ２５ １０２ ３１ １０３ ３４ １０４ ４３ １０５ ４４ １０６ ４９ １０７ ５０ １０８ ５５ １０９ ６０ １１０ １１１ ・ ・ シート２ Ａ Ｂ Ｃ １ ２ ・ ９９ １００ ２３ １ ２ ３ １０１ ２５ ４ ５ ６ １０２ ３１ ７ ８ ９ １０３ ３４ ０ １ ２ １０４ ４３ ３ ４ ５ １０５ ４４ ６ ７ ８ １０６ ４９ ９ ０ １ １０７ ５０ ２ ３ ４ １０８ ５５ ５ ６ ７ １０９ ６０ ８ ９ ０ １１０ １１１ ・ ・ シート１とシート２のA列に入っている数字が通し番号です。シート２では加えてその通し番号のデーター数字がＢ列、Ｃ列、Ｄ列に入っています。 のこシート１の通し番号３１が削除、代わりに通し番５番と５１番を追加し、 シート１ Ａ Ｂ Ｃ １ ２ ・ ９９ １００ ５ １０１ ２３ １０２ ２５ １０３ ３４ １０４ ４３ １０５ ４４ １０６ ４９ １０７ ５０ １０８ ５１ １０９ ５５ １１０ ６０ １１１ １１２ ・ ・ マクロを実行すると シート２ Ａ Ｂ Ｃ １ ２ ・ ９９ １００ ５ １０１ ２３ １ ２ ３ １０２ ２５ ４ ５ ６ １０３ ３４ ０ １ ２ １０４ ４３ ３ ４ ５ １０５ ４４ ６ ７ ８ １０６ ４９ ９ ０ １ １０７ ５０ ２ ３ ４ １０８ ５１ １０９ ５５ ５ ６ ７ １１０ ６０ ８ ９ ０ １１１ １１２ ・ ・ シート２がこように通し番号３１が入っていた行番１０２行が削除され、新たに通し番５番が行番１００に、５１番が行番１０８に挿入追加されるマクロを教えていただきたく、よろしくお願いします。
- ベストアンサー
- オフィス系ソフト
- 指定行を取得する方法を教えて下さい。
変数 $a = "a\nb\nc\nd\ne\nf\ng\n"; としています。 echo $a; の結果をブラウザで表示させてソースを見ると、下記のように意図した通り表示されます。 a b c d e f g この変数 $a の中から3行目("C")だけを取り出したい場合のようにすればよいのでしょうか？ よろしくお願い致します。
- ベストアンサー
- PHP
- VBAで色の付いているセルの行削除
VBAで色の付いているセルの行を削除することは出来ないでしょうか？ 量が多すぎて一つ一つ削除すのは大変で間違えて削除してしまいそうなので・・・ － 文字または数字 ■ 色の付いたセル（赤） Ａ Ｂ Ｃ Ｄ Ｅ Ｆ・・・ １－ － － － － － ２－ － － － － － ３－ － － ■ － － ４－ － ■ － － － ５－ － ■ － － － ６－ － － － － － ７－ － － ■ － － ８－ － ■ － － － ９－ － ■ － － － 10－ － － － － － ↓ Ａ Ｂ Ｃ Ｄ Ｅ Ｆ・・・ １－ － － － － － ２－ － － － － － ６－ － － － － － 10－ － － － － － よろしくお願いします。
- ベストアンサー
- オフィス系ソフト
- Excelで、任意の言葉で始まる行のみを、行ごと一括で削除する方法を教
Excelで、任意の言葉で始まる行のみを、行ごと一括で削除する方法を教えて下さい！ 頭から湯気が出そうです... 例えば、下記の場合 A... B... C... B... A... C... A... B... ↓このようにBで始まる行のみ一括で削除したいです A... C... A... C... A... マクロでも関数でも良いので、なるべく簡単な方法を教えてくださいませ よろしくお願い致します
- ベストアンサー
- オフィス系ソフト
お礼
ご回答ありがとうございました。こういうてもありますね。大変参考になりました。