my @array = @{[split(/;/,'A;1;2;;;;')]};
$array[6]=6;
$array[3]=3;