#!/usr/bin/perl use strict; use warnings; use XML::Twig; my $file = 'Summary'; my $t = XML::Twig->new(twig_handlers => { docsum => \&docsum, para => sub {$_->set_gi('Item')} } ); $ty->parsefile($file); $ty->flush,"\n"; sub docsum{ my ($ty,$docsum) = @_; $docsum->set_gi('docsum'); my $title = $docsum->first_child('Item'); my $and = $title-{'att'}->{'Name'}; $docsum->flush; } ##

##





	25
	ABL1
	v-abl Abelson murine leukemia viral oncogene homolog 1
	Homo sapiens
	0
	0
	9
	genomic
	9q34.1
	ABL, JTK7, bcr/abl, c-ABL, p150, v-abl
	Abelson murine leukemia viral (v-abl) oncogene homolog 1|BCR/ABL (major breakpoint) fusion peptide|bcr/c-abl oncogene protein|proto-oncogene tyrosine-protein kinase ABL1
	ABL1
	v-abl Abelson murine leukemia viral oncogene homolog 1
	Official
	9606
	
		189980
	
	
		
			9
			NC_000009.10
			132579088
			132752882
		
	



	27
	ABL2
	v-abl Abelson murine leukemia viral oncogene homolog 2 (arg, Abelson-related gene)
	Homo sapiens
	0
	0
	1
	genomic
	1q24-q25
	RP11-177A2.3, ABLL, ARG
	Abelson murine leukemia viral (v-abl) oncogene homolog 2|Abelson-related|v-abl Abelson murine leukemia viral oncogene homolog 2
	ABL2
	v-abl Abelson murine leukemia viral oncogene homolog 2 (arg, Abelson-related gene)
	Official
	9606
	
		164690
	
	
		
			1
			NC_000001.9
			177465358
			177343379
		
	



	90
	ACVR1
	activin A receptor, type I
	Homo sapiens
	0
	0
	2
	genomic
	2q23-q24
	ACTRI, ACVRLK2, ALK2, FOP, SKR1
	activin A receptor, type II-like kinase 2|activin A type I receptor|hydroxyalkyl-protein kinase
	ACVR1
	activin A receptor, type I
	Official
	9606
	
		102576
	
	
		
			2
			NC_000002.10
			158403035
			158301206