Programming-Idioms

This language bar is your friend. Select your favorite languages!

Idiom #148 Read list of integers from stdin

Read a list of integer numbers from the standard input, until EOF.

string input = Console.ReadLine();
string[] intlist = input.Split(new char[] {',', ' '});
	
foreach(string item in intlist)
{
  Console.WriteLine(Convert.ToInt32(item));
}
import std.stdio;
import std.conv : to;
import std.algorithm.iteration : map;
auto list = stdin.byLine.map!(a => a.to!int);
integer :: I,j,k ,l(3)
read(*,*) I, j, k, l

import (
	"bufio"
	"os"
	"strconv"
)
var ints []int
s := bufio.NewScanner(os.Stdin)
s.Split(bufio.ScanWords)
for s.Scan() {
	i, err := strconv.Atoi(s.Text())
	if err == nil {
		ints = append(ints, i)
	}
}
read <$> getLine :: IO [Integer]

-- reading space separated list of ints
map read . words <$> getLine :: IO [Int]
process.stdin.on('data', processLine)

function processLine (line) {
  const string = line + ''
  console.log(string)
}
(read)
fgl
type
  TFloatList = specialize TFPGList<Double>;
var
  List: TFloatList;
  D: Double;

begin
  List := TFloatList.Create;
  while not Eof do
  begin
    Read(D);
    List.Add(D);
  end;
  List.Free;
end.
@x = map {chomp; $_} <>;
list(map(int, input().split())
numbers = [int(x) for x in input().split()]
STDIN.read.split.map(&:to_i)
use std::io::stdin();
let in = stdin();
let lock = in.lock();
let nums = lock.lines()
    .map(|line| isize::from_str_radix(line.trim(), 10);
Do you know the best way to do this in your language ?
New implementation...

Idiom created by

psqq 
string input = Console.ReadLine();
string[] intlist = input.Split(new char[] {',', ' '});
	
foreach(string item in intlist)
{
  Console.WriteLine(Convert.ToInt32(item));
}
auto list = stdin.byLine.map!(a => a.to!int);
integer :: I,j,k ,l(3)
read(*,*) I, j, k, l

var ints []int
s := bufio.NewScanner(os.Stdin)
s.Split(bufio.ScanWords)
for s.Scan() {
	i, err := strconv.Atoi(s.Text())
	if err == nil {
		ints = append(ints, i)
	}
}
read <$> getLine :: IO [Integer]

-- reading space separated list of ints
map read . words <$> getLine :: IO [Int]
process.stdin.on('data', processLine)

function processLine (line) {
  const string = line + ''
  console.log(string)
}
(read)
type
  TFloatList = specialize TFPGList<Double>;
var
  List: TFloatList;
  D: Double;

begin
  List := TFloatList.Create;
  while not Eof do
  begin
    Read(D);
    List.Add(D);
  end;
  List.Free;
end.
@x = map {chomp; $_} <>;
list(map(int, input().split())
numbers = [int(x) for x in input().split()]
STDIN.read.split.map(&:to_i)
let in = stdin();
let lock = in.lock();
let nums = lock.lines()
    .map(|line| isize::from_str_radix(line.trim(), 10);