Project Detail

Description

I need a perl script to make a easy task.
Really, the title of this post say what I need.

I have got a list of emails in my customers database and I want make the send job a bit faster and organized.
What I want to do is sort emails alphabetically by domains.

For example :

File 'List-101006' contain :
--
user at gmail.com
user at domain.com
user at hotmail.com
user at yahoo.com
user at anotherdomain.com
...
--

(I can't use @ here)

$ ./script.pl list-name file-to-save
$ ./script.pl List-101006 List-Saved

The script should not change the original file, just save the sorted list in another file.

And the second task can be integrated in the same script or another new one, as you want.

Filter script should work :

$ ./script.pl list-name file-to-save word-to-remove-from-list
$ ./script.pl List-101006 List-Save wrong (*wrong*/*wrong/wrong*/wrong)

The script should remove from file the right word, for example if I use just use 'wrong' this should remove all lines that containg the word 'wrong'. Also allow me to use wildcards/wildcards.
And save the new list in the file-to-save without make any change in the original list.

Well, I explained it very good but if you need any other details let me know.