清华大佬耗费三个月吐血整理的几百G的资源，免费分享！....>>>

my %hash;
while(<>)
{
    chomp();
    if( /("(.+?)")/ )
    {
        $hash{$1} = "";
    }
}

foreach (sort(keys %hash))
{
    print ;
    print "\n";
}