use warnings; use strict; my @chars = ('a'..'z', 'A'..'Z', '0'..'9', '!', '@', '#', '$', '%', '^', '&', '*'); print @chars;