print # sign with alphabet array

Hi All

I use this code to dynamically print the alphabet:

my @Alphabet = ("A".."Z");

foreach my $Letter (@Alphabet) {
print "$Letter ";
}


RESULT: A B C D E F G H I J K L M N O P Q R S T U V W X Y Z


How do I add the # in the array in front of the "A"


DESIRED RESULT:  # A B C D E F G H I J K L M N O P Q R S T U V W X Y Z




blnukemAsked:
Who is Participating?

Improve company productivity with a Business Account.Sign Up

x
 
ozoConnect With a Mentor Commented:
my @Alphabet = ("#", "A".."Z");
0
 
Adam314Commented:
Or if you don't want to change @Alphabet (in case it's used elsewhere)

my @Alphabet = ("A".."Z");
 
print "# ";
foreach my $Letter (@Alphabet) {
print "$Letter ";
}

Open in new window

0
 
ozoCommented:
or
 print "$_ " foreach ('#',@Alphabet);
or
print "# @Alphabet ";
0
Question has a verified solution.

Are you are experiencing a similar issue? Get a personalized answer when you ask a related question.

Have a better answer? Share it in a comment.

All Courses

From novice to tech pro — start learning today.