ファイルへの書き込みと行毎の読み込み

JavaScript Perl PHP Python Ruby Shell

Contents [hide]

出力結果

1
2
3
Hello World!
 
Additional line

プログラム例

JavaScript

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
const fs = require('fs');
const readline = require('readline');
let output_file = "/tmp/output_js.txt";
let line_cnt = 0;
fs.writeFile(output_file, "Hello World!\n\nAdditional line\n", (err, resp) => {
  if (err) throw err;
  const fileStream = fs.createReadStream(output_file);
  const rl = readline.createInterface({
    input: fileStream,
    crlfDelay: Infinity
  });
  rl.on('line', (line) => {
    console.log(`${line}`);
    line_cnt++;
  });
  rl.on('close', ()=>{console.log(line_cnt);});
});

PHP

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
<?php
$output_file = "/tmp/output_php.txt";
try {
  $fh = fopen($output_file, "w");
  fwrite($fh, "Hello World!\n\nAdditional line\n");
  fclose($fh);
}
catch (Exception $e) {
  echo $e->getMessage();
  exit;
}
 
$cnt = 0;
if($fh = fopen($output_file, "r") ){
  while($line = fgets($fh)) {
    print $line;
    $cnt++;
  }
  fclose($fh);
  print $cnt."\n";
}

Perl

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
use strict;
use FileHandle;
my $output_file = "/tmp/output_perl.txt";
if(my $fh = new FileHandle('> '.$output_file) ){
  print $fh "Hello World!\n\nAdditional line\n";
  $fh->close();
}
else{
  die("Failed to write to ".$output_file);
}
 
if(my $fh = new FileHandle($output_file) ){
  my $cnt = 0;
  while(<$fh>){
    print $_;
    $cnt++;
  }
  $fh->close();
  print $cnt."\n";
}

Python

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
import sys
output_file = "/tmp/output_python.txt"
try:
  with open(output_file, "w") as wfh:
    wfh.write("Hello World!\n\nAdditional line\n")
except IOError:
  print("Failed to write to " + output_file)
  sys.exit(1)
except:
  print("Unexpected error:", sys.exc_info()[0])
  sys.exit(1)
 
line_cnt = 0
with open(output_file, "r") as rfh:
  for line in rfh:
    print(line.rstrip("\n"))
    line_cnt += 1
print(line_cnt)

Ruby

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
output_file = "/tmp/output_ruby.txt"
begin
  File.open(output_file, "w") do |wfh|
    wfh.puts("Hello World!\n\nAdditional line\n")
  end
rescue SystemCallError => e
  puts "class=#{e.class},message=#{e.message}"
rescue IOError => e
  puts "class=#{e.class},message=#{e.message}"
end
 
line_cnt = 0
File.open(output_file, "r") do |rfh|
  while (line = rfh.gets)
    puts line
    line_cnt += 1
  end
end
 
puts line_cnt

Shell

1
2
3
4
5
6
7
8
9
10
#!/bin/bash
output_file="/tmp/output_shell.txt";
echo -e -n 'Hello World!\n\nAdditional line\n' > $output_file || exit 1;
line_cnt=0;
while IFS= read -r line
do
  echo "$line"
  line_cnt=$((line_cnt + 1))
done <"$output_file"
echo $line_cnt;
プログラミング言語比較サイトProgrammingLang.comでは、同じ問題を複数のプログラミング言語がそれぞれどのような記述で解決できるのかの例を提供。
複数の言語を比較し、貴方の問題を解決するのに最適な言語の選択と、その言語での解法を得る事を手助けします。
全問題カバー: JavaScript Perl PHP Python Ruby | 一部: C C# C++ Go Java Rust Shell
 
問題解法大分類(50音順)
Class | 時間 | 数値 | System | Database | Test | Network | 配列 | ファイルシステム | 変数 | 文字列
その他役立ちコンテンツ

※当サイトではアフィリエイトプログラムを利用して商品を紹介しています。