Mine

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);  
	}
}