String::Combination worked for me. Try this:

#!/usr/bin/perl

use strict;
use warnings;
use diagnostics;
use String::Combination qw(combination);

my @comp = combination('12345678', 8);

print "@comp\n";
[download]

It works with k integers 2 thru 8.