Uso de sed em perl?

Question

Eu quero reutilizar o código fornecido aqui , mas eu estou preso em entender o uso de sed :

print "Sending to QRadar...\n";
# SSH To QRadar's Console and push out file + trigger update
'scp -i $qradar_ssh_key -o UserKnownHostsFile=$qradar_ssh_knownhosts -o StrictHostKeyChecking=no root\@$qradar_console:/store/configservices/staging/globalconfig/remotenet.conf .';
'sed -i -e '/^SECULERT/d' remotenet.conf';
'cat $seculert_qradar_list >> remotenet.conf';
'scp -i $qradar_ssh_key -o UserKnownHostsFile=$qradar_ssh_knownhosts -o StrictHostKeyChecking=no remotenet.conf root\@$qradar_console:/store/configservices/staging/globalconfig/remotenet.conf';

Gostaria de saber o que o sed está fazendo aqui.

    

Answer 1

Na linha dada,

'sed -i -e '/^SECULERT/d' remotenet.conf';

o sinal -i significa que sed está editando remotenet.conf no lugar e -e '/^SECULERT/d' exclui todas as linhas que começam com "SECULERT".