Warning: file_get_contents(/data/phpspider/zhask/data//catemap/8/perl/9.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
Perl 从文件中剥离文本_Perl - Fatal编程技术网

Perl 从文件中剥离文本

Perl 从文件中剥离文本,perl,Perl,我需要从文件夹中的所有javascript文件中删除所有console语句(console.log、console.error等)。我该怎么做 试一试: perl -pi -e "s/console.(.*);/g" *.js 不能正常工作。我必须删除从控制台开始的所有内容。并以右括号结束,而不是分号。假设所有的控制台命令都在单独的行中,您可以尝试以下操作 perl -pi -e "s/^\s*console\.\(.*?\);\s*$//g" *.js 没有试过,但是短的sed怎么样

我需要从文件夹中的所有javascript文件中删除所有
console
语句(
console.log、console.error
等)。我该怎么做

试一试:

perl -pi -e "s/console.(.*);/g" *.js 

不能正常工作。我必须删除从控制台开始的所有内容。并以右括号结束,而不是分号。假设所有的
控制台
命令都在单独的行中,您可以尝试以下操作

perl -pi -e "s/^\s*console\.\(.*?\);\s*$//g" *.js 

没有试过,但是短的
sed
怎么样

例如:

find . -name "*.js" -exec sed -i "s/console\.[^\)]+\);//g" '{}' \;

@我没有忘记。我认为OP想要删除整行