On Fri, Jun 25, 2021 at 06:12:09AM -0400, Andrew Dunstan wrote:
> + # On Msys, filter out any CRLF.
> + $contents_raw =~ s/\r\n/\n/g if $Config{osname} eq 'msys';
>
> This is completely redundant. The whole point is that slurp_file does
> exactly this for you.
Thanks. I have managed to duplicate that.
> + my @contents = split("\n", $contents_raw);
>
> Probably more idiomatic to write split(/\n/,$contents_raw), or
> split(/^/, $contents_raw) if you want to keep the line feeds.
I have gone with the solution that removes the newlines. This does
not change the pattern checks, and that makes printing entries not
matching a bit cleaner.
Thanks a lot for the investigation!
--
Michael
signature.asc
Description: PGP signature
