sub SomeSub {

my @Data = sort($a cmp $b) @_;

# do something with @Data

}