print join " ",  reverse split foreach  
	map  { $_->[0] } 
	sort { $a->[1]<=>$b->[1] || $a->[0] <=> $b->[0] } 
	map  { [ $_ , (split)[-1] ] } 
	grep { /SRC1/ } <> ;