You cannot select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
13 lines
277 B
Perl
13 lines
277 B
Perl
5 years ago
|
@names = (Tom, Tom, James, Pete, Cindy, Carol);
|
||
|
@names = sort @names;
|
||
|
print "@names\n";
|
||
|
|
||
|
@numbers = (12,45,36,14,258,1,2,4,);
|
||
|
@numbers = sort @numbers;
|
||
|
print "@numbers\n";
|
||
|
|
||
|
@numbers = sort sortNumbers @numbers;
|
||
|
print "@numbers\n";
|
||
|
sub sortNumbers(){
|
||
|
$a <=> $b;
|
||
|
}
|