eliminating duplicate lines in a file

[cherukuwada subrahmanyam]

Hi,
Iam reading flat text file of 100000 lines. Each line has got data of 
maximum 10 characters.
I want to eliminate duplicate lines and blank lines out of that file.
i.e. something like sort -u in unix.

Example:
if the file contains:
abcdef

dfsdf
abcdef

dfsdf
12334
Then the output should be:
abcdef
dfsdf
12334


Is there any easy way of doing it in perl???
thanks,

_________________________________________________________________________
Get Your Private, Free E-mail from MSN Hotmail at http://www.hotmail.com.