my @digits = qw(a b c d);
    while(length @tab < 10)
    {
        push @digits, "a";    
    }