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

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