Beefy Boxes and Bandwidth Generously Provided by pair Networks
Think about Loose Coupling

Re: Delete specific lines from txt file.

by NetWallah (Canon)
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=""; # 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.

Replies are listed 'Best First'.
Re^2: Delete specific lines from txt file.
by MidLifeXis (Monsignor) 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.


Log In?

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://985868]
[LanX]: he loves to do this with regexes ...
LanX considers looking for a new project ...

How do I use this? | Other CB clients
Other Users?
Others scrutinizing the Monastery: (3)
As of 2018-03-19 23:28 GMT
Find Nodes?
    Voting Booth?
    When I think of a mole I think of:

    Results (246 votes). Check out past polls.