perl中如何删除文件数据中的“>”?

我想把一个list.txt文件的每行开头的>符号删除请问该怎么做到?
2025-03-29 05:11:24
推荐回答(2个)
回答1:

如果>只在第一个字符,后面没有>、或者后面的都保留,那么可以使用下面的语句:
$s='>sdklfsadfskldjfklsjdf';
$s=substr($s,1);
print $s;

如果要删除前面的一个或者多个>,那么可以使用下面的语句:
$s='>>>sdklfsadfskldjfklsjdf';
$s=~s/^>+//g;
print $s;

回答2:

perl -i.bak -pe 's/^>//' list.txt

#backup file list.txt.bak