Thankyou very much for your help. I'am novice in perl and I try to modify existing one. the script is for windows. in poor words:

 
for example: 

how perl work now: 

read from these example excel 
___________________________________ 
---------|pr_family|___pr1___|___pr2___| 
___________________________________ 

item 1 |___1,2__|__value 1_|_value 2_| 


item 2 |___1,2__|__value 3_|_value 3_| 


item 3 |___1,2__|__value 5_|_value 4_| 


convert to XML (output): 

item 1 - pr_family: 1 - pr_1: value 1 - pr_2: value 2 - 

item 1 - pr_family: 2 - pr_1: value 1 - pr_2: value 2 - 

item 2 - pr_family: 1 - pr_1: value 3 - pr_2: value 3 - 

item 2 - pr_family: 2 - pr_1: value 3 - pr_2: value 3 - 

item 3 - pr_family: 1 - pr_1: value 5 - pr_2: value 4 - 

item 3 - pr_family: 2 - pr_1: value 5 - pr_2: value 4 - 
_________________________________________________________ 

ok, but I need to modify theese perl because I must add moore than one
+ value in pr conlum, like is for family,

with split (',') in pr1,pr2: 

example what the perl have to do after modify:

excel 
________________________________________________ 
---------|_pr_family_|____pr1________|____pr2________| 
________________________________________________ 

item 1 |___1,2____|_value 1,value 5_|____value 2_____| 

item 2 |___1,2____|_____value 3____|_value 3,value 4_| 

item 3 |___1,2____|_____value 5____|____value 4_____| 


convert to XML (output): 

item 1 - pr_family: 1 - pr_1: value 1 - pr_2: value 2 - 

item 1 - pr_family: 2 - pr_1: value 1 - pr_2: value 2 - 

item 1 - pr_family: 1 - pr_1: value 5 - pr_2: value 2 - 

item 1 - pr_family: 2 - pr_1: value 5 - pr_2: value 2 - 

item 2 - pr_family: 1 - pr_1: value 3 - pr_2: value 3 - 

item 2 - pr_family: 2 - pr_1: value 3 - pr_2: value 3 - 

item 2 - pr_family: 1 - pr_1: value 3 - pr_2: value 4 - 

item 2 - pr_family: 2 - pr_1: value 3 - pr_2: value 4 - 

item 3 - pr_family: 1 - pr_1: value 5 - pr_2: value 4 - 

item 3 - pr_family: 2 - pr_1: value 5 - pr_2: value 4 -
[download]