Remove UTF-8 BOM if present

2026-06-15 14:32:34 -04:00 · 2026-06-15 14:32:34 -04:00 · edd58efa44
commit edd58efa44
parent d3f486f7c4
1 changed files with 1 additions and 0 deletions
--- a/google-civic-api.pl
+++ b/google-civic-api.pl
@ -86,6 +86,7 @@ foreach my $file (@files) {
    # Read and parse the header line to create column mapping
    my $header = <$fh>;
    chomp $header;
+    $header =~ s/^\xef\xbb\xbf//;  # Remove UTF-8 BOM if present (byte sequence)
    print "Header: $header\n" unless $emailCsvArg;
    
    # Parse header to get column indices by name