function szulnap(fajlnev)
    % adatbetoltes
    f = fopen(fajlnev, 'r');
    fgets(f);
    n = 0;
    while 1
        s = fgets(f);
        if s == -1; break; end
        n++;
        [t s] = strtok(s, ';');
        nev{n} = t;
        [t s] = strtok(s, ';-');
        szuld(n, 1) = str2num(t);
        [t s] = strtok(s, '-');
        szuld(n, 2) = str2num(t);
        [t s] = strtok(s, '-');
        szuld(n, 3) = str2num(t);
    end
    fclose(f);

    % mely napokon van 1-nel tobb szuletesnapos
    x1 = 100 * szuld(:, 2) + szuld(:, 3);
    for k = 1 : length(x1)
	j = find(x1 == x1(k));
	if x1(k) ~= 0 && length(j) > 1
	    fprintf("%02d-%02d: %d szuletesnapos\n", szuld(k, 2), szuld(k, 3), length(j));
	    x1(j) = 0;
	end
    end

    % eletkor szerinti listazas
    x2 = 10000 * szuld(:, 1) + x1;
    [y z] = sort(x2);
    fprintf("Eletkor szerinti sorrend:\n");
    for j = 1 : n
	k = z(j);
	fprintf("%d.\t%s\t%02d-%02d-%02d\n", j, nev{k}, szuld(k, 1), szuld(k, 2), szuld(k, 3));
    end
end