#!/usr/bin/env perl
use utf8;
###############################################################################
# This program simply copies an input stream to the console line by line.
# 
# Copyright © 2020 Richard Lesh.  All rights reserved.
###############################################################################

use strict;
use warnings;

MAIN:
{
	binmode(STDOUT, ":utf8");
	binmode(STDERR, ":utf8");
	binmode(STDIN, ":utf8");
	my $line;
	while ($line = <STDIN>) {
		chomp($line);
		print $line, "\n";
	}
}