ファイルの追加

ファイルに TEXT データを追加します。

プログラムの説明

  1. エディタで File_App.pl を作成して下さい。
    ファイルの作成 のファイル(test.txt)にデータを追加します。
    $file = "test.txt";
    open (DATA, ">>$file");
    print DATA "薔薇\n";
    print DATA "桜\n";
    close (DATA);
    
    print "\ntest.txt Check\n";
    open (DATA, "<$file");
    while(<DATA>)
    { print; }
    close (DATA);
    
  2. 【実行画面】
    C:\DATA\Perl>perl file_put.pl
    test.txt Complete
    
    C:\DATA\Perl>perl file_app.pl
    test.txt Check
    りんご
    バナナ
    パイナップル
    いちご
    薔薇
    桜
    
  3. $file = "test.txt" が追加するファイルの名前です。
    open (DATA, ">>$file"); でファイルを追加モードでオープンします。
    DATA はファイルハンドルです。適当な名前を使って下さい。
  4. print DATA "薔薇\n"; でファイルにデータを追加します。
  5. 追加が終われば close して下さい。
  6. データの追加が終われば、印字して確認します。
    ファイルの入力は ファイルの入力 を参照して下さい。

前田稔の超初心者のプログラム入門
超初心者のプログラム入門(Perl)