@names = (Cindy, Carol, Sherry, Tom, Jessica, Scott); @names = reverse @names; print "@names\n"; @numbers = reverse @numbers; print "@numbers\n"; $names = reverse @names; print "$names\n"; sub sortNumbers(){ $a <=> $b; }