준호씨의 블로그

perl - read file line by line 본문

개발이야기

perl - read file line by line

준호씨 2019.01.05 00:41
#!/usr/bin/env perl

use strict;
use warnings;

my $file = "something.txt";
open my $info, $file or die "Could not open $file: $!";

while (my $line = <$info>) {
    print $line;
}
close $info;
0 Comments
댓글쓰기 폼