my ($Name, $Data)=split,1;