Logo Questions Linux Laravel Mysql Ubuntu Git Menu
 

Perl regex to act on a file from the command line

Tags:

unix

perl

In a file, say xyz.txt i want to replace the pattern of any number followed by a dot example:1.,2.,10.,11. etc.. with a whitespace. How to compose a perl command on the command line to act on the file to do the above, what should be the regex to be used ?

Please Help Thank You.

like image 394
Jim Avatar asked Dec 05 '10 20:12

Jim


1 Answers

This HAS to be a Perl oneliner?

perl -i -pe  's/\d+\./ /g' <fileName>

The Perl command line options: -i is used to specify what happens to the input file. If you don't give it a file extension, the original file is lost and is replaced by the Perl munged output. For example, if I had this:

perl -i.bak -pe  's/\d+\./ /g' <fileName>

The original file would be stored with a .bak suffix and <fileName> itself would contain your output.

The -p means to enclose your Perl program in a print loop that looks SOMEWHAT like this:

while ($_ = <>) {
    <Your Perl one liner>
    print "$_";
}

This is a somewhat simplified explanation what's going on. You can see the actual perl loop by doing a perldoc perlrun from the command line. The main idea is that it allows you to act on each line of a file just like sed or awk.

The -e simply contains your Perl command.

You can also do file redirection too:

perl -pe  's/\d+\./ /g' < xyz.txt > xyz.txt.out
like image 88
David W. Avatar answered Sep 30 '22 19:09

David W.