Logo

Programming-Idioms

This language bar is your friend. Select your favorite languages!
Select your favorite languages :
  • Or search :

Idiom #279 Read list of strings from the standard input

Read all the lines (until EOF) into the list of strings lines.

with Ada.Text_IO;
with Ada.Containers.Indefinite_Vectors;
declare
   package String_Vectors is new
      Ada.Containers.Indefinite_Vectors
         (Index_Type => Positive, Element_Type => String);
   use String_Vectors, Ada.Text_IO;
   Lines : Vector;
begin
   while not End_Of_File loop
      Lines.Append (Get_Line);
   end loop;
end;
import "bufio"
import "os"
var lines []string
s := bufio.NewScanner(os.Stdin)
for s.Scan() {
	line := s.Text()
	lines = append(lines, line)
}
if err := s.Err(); err != nil {
	log.Fatal(err)
}
uses classes;
while not EOF do
begin
  readln(s);
  lines.Add(s);
end;
import sys
lines = sys.stdin.readlines()
lines = readlines
use std::io::prelude::*;
let lines = std::io::stdin().lock().lines().map(|x| x.unwrap()).collect::<Vec<String>>();

New implementation...