number printer

gistfile1.txt

use 5.010;

use strict;
use warnings;

# ---

open my $fh_read, '<', 'numbers.txt' or die "can't read shit";

while (<$fh_read>) {
  chomp;
  say;
}