Stuff

my $z = 6;
my $child = 0;
for ($z=6;$z<10;$z++)
{
 my $paraa = shift @price;
 if(defined($paraa) && defined($paraa->att('adult')) && $paraa->att('adult')*1 && $z < 9) 
 {
    $insert->bind_param( $z, $paraa->att('adult')); 
 }
 elsif ($z < 9)
 {
   $insert->bind_param($z, ''); 
   $child = $paraa->att('child') if(defined($paraa)) && defined($paraa->att('child') && $paraa->att('child')*1);
  }
  elsif (defined($paraa) && defined($paraa->att('child')) && $paraa->att('child')*1)
  {
    $insert->bind_param(9, $paraa->att('child')); 
  }	
  else
  {
    $insert->bind_param(9, $child);  
  }
}