This script will remove every line with the keyword ftwsx (of course you can change this). The result will be stored in 2.txt.

open (ERSTE, "1.txt") || die "file not found\n";

@urls = <ERSTE>;
close (ERSTE);
open (OUTFILE, ">>2.txt");


next if $_ =~ /ftwsx/;
# remove all lines with keyword ftwsx

print OUTFILE $_,;
close (OUTFILE);



Back to previous page

Get Free Autoresponder

Enter your email address below and you will receive a powerful Autoresponder and our Special Ezine for free:

(Please use your real email address or else you won't receive the free script)

Name: *
Email: *

Or you can subscribe by clicking this link to send an email automatically: