Delete line from string using perl

rajeshkumar created the topic: Delete line from string using perl

Questions:
Delete line from string using perl
Delete entry from array based on custom duplicate value.
How to delete lines that match certain pattern
============================
$info = ”
This is Rajesh
This is Ram
This is test
This is Raju

Some solutions which i found on net but none of them seems working.

Sol1

if($line =~ /MatchText/){
$line =~ s/ReplaceMe/REPLACED/gi;
}

Sol2

perl -ni -e 'print unless /pattern/' /path/to/filename

Sol3
$ cat /path/to/file | perl -e 'while(<>){ if( /pattern/ ) { $linecount++; } else { print "$_"; } } print STDERR "Deleted $linecount lines.\n"' > /path/to/newfile

Sol4
$_ = "$delete"; #readin file content into standard variable
s/pattern//g; #pattern will get replaced by nothing globally
$delete = $_; #new file content back into old file

Sol5

sed -e '/Bob/d' -e '/Mary/d' outfile

Regards,
Rajesh Kumar
Twitt me @ twitter.com/RajeshKumarIn

Rajesh Kumar
Follow me
Subscribe
Notify of
guest
0 Comments
Inline Feedbacks
View all comments
0
Would love your thoughts, please comment.x
()
x