Nvuの先頭の改行コード削除について


2chNvuスレをたまたま見てみたら、このブログの記事が紹介されていた。


ま、8月ぐらいの書き込みなので、もう遅いとは思うのだが・・・。


このプログラムは、サーバーで使うものではなくて、Nvuでhtmlファイルを作成した後に、そのhtmlファイルをこのプログラムにかけることで、先頭の改行コードを削除してくれるものである。


ちなみに、このプログラムは、Windows上で、Active Perlを使える環境で、動作確認してある。


Perlがわかる人は、ただ、文章を読み込んで、保存するだけというプログラムとも言えないものであることがわかるとは思うのだが・・・。


以下の手順で環境を整備し、実行することで、このプログラムは使うことができる。

  1. Active Perlをダウンロードしてきて、コンピュータにインストールする。
  2. コンピュータを再起動する。
  3. メモ帳(エディタ)を起動する。
  4. 四角い枠で囲まれたプログラムのソースをメモ帳(エディタ)にコピーする。
  5. 必要な部分を修正する。(「処理するファイル名」と「処理後のファイル名」のそれぞれに実際のファイル名を入力する。)
  6. 拡張子を「.pl」にして保存する。(例:delbr.plなど)
  7. 同じフォルダの中に、処理するhtmlファイルとプログラムを一緒に入れる。
  8. プログラムをダブルクリックする。
  9. フォルダの中に新しいファイルができているので、それが処理済みのファイルとなる。
#! /usr/local/bin/perl
#*************************************************
# データを読み込み、別ファイルに保存するプログラム
#*************************************************

# 入出力ファイル定義部

open (IN,"処理するファイル名") || die "ファイルが見つかりませんでした。";
open (OUT,">処理後のファイル名");


# 処理部

while(<IN>){
          print OUT;
      }


# 終了処理

close IN;
close OUT;

Nvuを使ってみたら・・・。その2
http://d.hatena.ne.jp/toypoo/20050709#p2