my $collection = Collection->new({ 'sorter' => Sort::mysorter });
##</code><code>##

sub new
{
  my ($self, $options) = @_;
  .  .  .
  $self->{sorter} = /&{$options->{sorter}};
}

##</code><code>##

$self->{sorter}($mystuffToSort);