Re^3: How to read from a .txt

Didn't try your code, but the syntax for open is usually this:

open(my $fh, "<", "input.txt") 
    or die "cannot open < input.txt: $!";
[download]

Comment on Re^3: How to read from a .txt Download Code

Replies are listed 'Best First'.
Re^4: How to read from a .txt by Jim (Curate) on Jul 01, 2013 at 03:01 UTC
Here's how to read records (lines) from a plain text file in the ASCII character encoding: `use strict; use warnings; use autodie qw( open close ); use English qw( -no_match_vars ); @ARGV == 1 or die "Usage: perl $PROGRAM_NAME <input file>\n"; my $input_file = shift; open my $fh, '<:encoding(ASCII)', $input_file; RECORD: while (my $record = <$fh>) { # Do something with record... } close $fh;` [download]	[reply] [d/l]

Replies are listed 'Best First'.

Re^4: How to read from a .txt
by Jim (Curate) on Jul 01, 2013 at 03:01 UTC

Here's how to read records (lines) from a plain text file in the ASCII character encoding:

use strict;
use warnings;

use autodie qw( open close );
use English qw( -no_match_vars );

@ARGV == 1 or die "Usage: perl $PROGRAM_NAME <input file>\n";

my $input_file = shift;

open my $fh, '<:encoding(ASCII)', $input_file;

RECORD:
while (my $record = <$fh>) {
    # Do something with record...
}

close $fh;
[download]

[reply]
[d/l]