#! perl -slw
use strict;
use lib '/opt/perl5/perlbrew/bin/perlbrew/perls/perl-5.14.0/lib/site_perl/5.14.0/darwin-2level'

use Algorithm::Combinatorics qw[ combinations ];

my @total = (
"1-S","2-S","3-S","4-S","5-S","6-S","7-S","8-S","9-S","10-S","11-S","1
+2-S","13-S","14-S",
"1-H","2-H","3-H","4-H","5-H","6-H","7-H","8-H","9-H","10-H","11-H","1
+2-H","13-H","14-H",
"1-R","2-R","3-R","4-R","5-R","6-R","7-R","8-R","9-R","10-R","11-R","1
+2-R","13-R","14-R",
"1-K","2-K","3-K","4-K","5-K","6-K","7-K","8-K","9-K","10-K","11-K","1
+2-K","13-K","14-K"
);

my $iter = combinations( [0..55], 5 );

print join ' ', @total[ @$_ ] while defined( $_ = $iter->next );

##</code><code>##

getallcombos.pl:5: Compilation failed in require
getallcombos.pl:5: BEGIN failed--compilation aborted
this sentence appears to be wrong
use Algorithm::Combinatorics qw[ combinations ];