Re^3: By the shine on my bald pate, I dislike this encoding stuff

Empty string

All the content is read into @LINES so $filedata is empty

my(@LINES) = <ORDERFILE>;
my $filedata = <ORDERFILE>;

Maybe try

my @LINES = <ORDERFILE>;
my $filedata = join '',@LINES;

or just

open ORDERFILE, '<', $emailfile or die "$emailfile: $!";
my $filedata = do { local $/; <ORDERFILE> };
close ORDERFILE;

poj

Comment on Re^3: By the shine on my bald pate, I dislike this encoding stuff Select or Download Code

Replies are listed 'Best First'.
Re^4: By the shine on my bald pate, I dislike this encoding stuff by jfrm (Monk) on Mar 04, 2018 at 11:23 UTC
Thank you. I had no idea. That does work for the files that are ANSI. Most bizarrely, `my @LINES = <ORDERFILE>; my $filedata = join '',@LINES;` [download] works but the following does not + I get loads of warnings: "utf8 "\xA3" does not map to Unicode" `my $filedata = <ORDERFILE>;` [download]	[reply] [d/l] [select]
Re^5: By the shine on my bald pate, I dislike this encoding stuff by poj (Abbot) on Mar 04, 2018 at 14:29 UTC
`my $filedata = <ORDERFILE>;` That only reads the first line of the file. poj	[reply] [d/l]