my $orderby = 'collection';
my @data = readCollectionData('dummyFilename.txt');
my @indices = sortCollectionData($orderby, @data);
print Dumper \@indices;

printCollectionData(\@data, @indices);