@array=qw(name John number 7 status unknown); print join('',(map {!($_%2)?"$array[$_]=".$array[$_+1]:$_<$#array?'&':'';}(0 .. $#array)));