my $recordSet = 11;

    open FILE, "< $file" or die "Cannot open $file for reading: $!";
    chomp ( my @list = <FILE> );
    close FILE;

    my @datasets = ();
    while (my @subList = splice( @list, 0, $recordSet) ){
        push @datasets, \@subList;
    }