name1
address1
phone1
fax1
name2
address2
phone2
fax2

##</code><code>##

for($i=0;$<scalar(@slurpedarray);$i+=4){
  # work with $slurpedarray[$i], $slurpedarray[($i+1)],
  # $slurpedarray[($i+2)] and $slurpedarray[($i+2)]
}

##</code><code>##

while(@slurpedarray){
  ($name,$address,$phone,$fax) = splice(@slurpedarray,0,3)
  # work with nice named vars
}