Beefy Boxes and Bandwidth Generously Provided by pair Networks
more useful options
 
PerlMonks  

Re: Delete specific lines from txt file.

by NetWallah (Abbot)
on Aug 07, 2012 at 03:38 UTC ( #985868=note: print w/ replies, xml ) Need Help??


in reply to Delete specific lines from txt file.

Here is the (untested) rest of your program.

Please reference the perl documentation for constructs you have trouble with.

$/="\n\n"; # Set the record separator to be 2 newli +nes my $sportfile="my.sport.txt"; # Or whatever the file name is open (my $sport, "<", $sportfile) or die "Cannot open $sportfile : $!" +; while (defined <$sport>){ next if m/\b$first_name\b.+$last_name\b/; print; } close $sport;
Output will print to STDOUT. This can be directed to a file.
Update:Corrected "close $sportfile" to "close $sport;"

             I hope life isn't a big joke, because I don't get it.
                   -SNL


Comment on Re: Delete specific lines from txt file.
Download Code
Re^2: Delete specific lines from txt file.
by MidLifeXis (Prior) on Aug 07, 2012 at 12:38 UTC

    This can be directed to a file.
    Just don't redirect it to the original file name. The first thing the OS would do is to truncate the original file, leaving no data for your text file to work with.

    --MidLifeXis

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://985868]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others making s'mores by the fire in the courtyard of the Monastery: (7)
As of 2014-09-01 19:24 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    My favorite cookbook is:










    Results (16 votes), past polls