负前瞻不适用于 SourceFile

Question

我正在尝试使用正则表达式编辑一些文件。

sed 似乎太有限，所以我改用 Perl。

我的语法可能有问题。

正则表达式模式适用于 TextMate。

当我使用 Perl 时没有任何反应。

我想删除所有不包含SourceFile 或"" 的行。

供您参考，用于清理来自exiftools 的输出数据。

$ perl -pe 's/^(?!.*(SourceFile|"").*).*$\n//g' out.csv

$ cat out.csv
SourceFile,GPSLatitude,GPSLongitude
1.jpg,,
2.jpg,,
3.jpg,"10 deg 20' 30.30"" N","40 deg 50' 60.60"" W"
4.jpg,"10 deg 20' 30.30"" N","40 deg 50' 60.60"" W"

清理应保留第一行和所有包含 GPS 数据的行。所以清理后应该是这样的：

SourceFile,GPSLatitude,GPSLongitude
3.jpg,"10 deg 20' 30.30"" N","40 deg 50' 60.60"" W"
4.jpg,"10 deg 20' 30.30"" N","40 deg 50' 60.60"" W"

Answer 1

如果要删除一行，则无需进行替换。检查条件并显示该行：

[edit] 似乎您想要的与您的初始模式所暗示的相反：

perl:

perl -ne '/SourceFile|""/&&print' file

awk：

awk '/SourceFile|""/' file

grep:

grep 'SourceFile\|""' file

---

[旧答案]

perl -ne '!/SourceFile|""/&&print' file

awk 更短：

awk '!/SourceFile|""/' file

或grep：

grep -v 'SourceFile\|""' file