Lines Matching refs:file_name
10 has 'file_name' => (
20 my $file_name = $args->{file_name};
21 if (!defined $file_name) {
28 open $fh, "<:encoding($encoding)", $file_name
29 or croak "Can't open $file_name: $!";
32 open $fh, '<', $file_name
33 or croak "Can't open $file_name: $!";
49 my ($self, $file_name, $encoding) = @_;
51 if (!defined $file_name) {
57 open $fh, "<:encoding($encoding)", $file_name
58 or croak "Can't open $file_name: $!";
61 open $fh, '<', $file_name
62 or croak "Can't open $file_name: $!";
78 return $self->file_name;