Re^3: UTF-8 text files with Byte Order Mark

        my $octets = encode("utf8", $line);
        $octets =~ s/^\x{ef}\x{bb}\x{bf}//;
        $line = decode("utf8", $octets);
[download]

is the same thing as

        my $BOM = decode("utf8", "\x{ef}\x{bb}\x{bf}");
        $line =~ s/^$BOM//;
[download]

is the same thing as

        my $BOM = chr(0xFEFF);
        $line =~ s/^$BOM//;
[download]

is the same thing as

        $line =~ s/^\x{FEFF}//;
[download]

which is what I gave you. Much simpler!