sub test06 {
	my $data = 'ZYX';
	my $test;

	($id) = $db->selectrow_array("INSERT INTO [dau].[dbo].[subsystem] ([bezeichnung]) VALUES('$data'); SELECT SCOPE_IDENTITY();") 
	or die "\nFehler: id konnte nicht angelegt werden:" . $db->errstr;
	print "\n\nid angelegt:$id";
}