print { $marctags[$x][3] } $tagdata[$x];