BEGIN{
    f="/data/images/proton2/run343/www/are/Mus_musculus_ATTTA_more_than_one_AREs.txt";
    while(getline<f){o[$1]=1;}
    close(f);
    FS="\t";
    getline;print $0;
}{
    if (o[$4]==1){print $0}
}