my @characters = ('A' .. 'Z', 'a' .. 'z', 0 .. 9, qw(- .));