使用perl从txt文件中删除项目符号

概述我正在编写一个perl脚本来处理文本文件.我需要从文本文件中删除项目符号并创建一个没有项目符号的新项目符号.当我查看文本文件的二进制版本时,项目符号存储为unicode项目符号(0xe280a2).如何从字符串中删除子d. 我试过以下代码： open($filehandle, '<:encoding(UTF-8)', $filename)or die "Could not open file ' 我正在编写一个perl脚本来处理文本文件.我需要从文本文件中删除项目符号并创建一个没有项目符号的新项目符号.当我查看文本文件的二进制版本时,项目符号存储为unicode项目符号(0xe280a2).如何从字符串中删除子d.

我试过以下代码：

open($filehandle,'<:enCoding(UTF-8)',$filename)or dIE "Could not open file '$filename' $!";while ($row = <$filehandle>) {   @txt_str = split(/\•/,$row);   $row = join(" ",@txt_str);}

解决方法 反斜杠在这里没有帮助,因为子d不是正则表达式中的特殊字符.

如果指定输入为UTF-8,则应搜索UTF-8项目符号.要这样做,要么前置

use utf8;

并将脚本保存为UTF-8;或者,使用

\N{BulLET}

在您的情况下,拆分和连接可以通过空间简单替换子d来代替：

while (<$filehandle>) {    s/\N{BulLET}/ /g; # or s/•/ /g under utf8    print;            # <-- this was missing in your code}

总结

以上是内存溢出为你收集整理的使用perl从txt文件中删除项目符号全部内容，希望文章能够帮你解决使用perl从txt文件中删除项目符号所遇到的程序开发问题。

如果觉得内存溢出网站内容还不错，欢迎将内存溢出网站推荐给程序员好友。