Select Code to Download

#!/usr/bin/perl 
#
@names = qw { steve Mary alice Robert MARVIN kENneth tiM }  ;
...
#
print "\nSorted names 1 \n" ;
# New code to sort and print names goes here.

sort @names
foreach $name (@names) {
print "Name: $name \n" ; } ;