in reply to 'sort -u' in perl

There is a lame builtin sort on Win32. so you can use this one-liner:
perl -ne "next if $seen{$_}++;print" a.txt | sort >b.txt