while (<IN>){
	chop;
	my ($waste, $wastea, @temp_array) = split;
	my $rv = $sth{$#temp_array+1}->execute(@temp_array);
}