my $statement = "SELECT DISTINCT(Rubrik), Code FROM ... ORDER BY Rubrik";
	my %categories = @{$dbh->selectcol_arrayref($statement, { Columns=>[2,1] })};