for (my $eu=0;$eu<=(scalar(@identifier));$eu++){
	foreach my $id(@idfeat)	{ if ($id eq $identifier[$eu]){
				my $sth=$dbh->prepare("INSERT INTO dd VALUES('$identifier[$eu]','Feature')");
				$sth->execute();	
				$sth->finish;
				} 
				else {my $sth=$dbh->prepare("INSERT INTO dd VALUES('$identifier[$eu]','Bug')");
				$sth->execute();	
				$sth->finish;
				}
			}
	}



##</code><code>##

A1 Feature
B1 Feature
C1 Bug
D1 Bug

##</code><code>##

A1 Feature
A1 Bug
B1 Feature
B1 Bug
C1 Bug
C1 Bug
D1 Bug
D1 Bug