($pdb_res) = (split /\s+/,$_) [3];