$ perl test4.pl | LC_ALL=C sort -u | wc -l
400000

$ perl test4.pl | LC_ALL=C sort -u | wc -l
400000

$ perl test4.pl | LC_ALL=C sort -u | wc -l
400000