https://bioinformaticsonline.com/snippets/view/40571/perl-subroutine-to-creating-kmer? https://bioinformaticsonline.com/snippets/view/40571/perl-subroutine-to-creating-kmer Mon, 20 Jan 2020 04:32:32 -0600 https://bioinformaticsonline.com/snippets/view/40571/perl-subroutine-to-creating-kmer sub k_mers { my ($sequence, $k) = @_; my $len = length($sequence); my @result = (); for (my $i = 0; $i <= $len-$k; $i++) { push(@result, substr($sequence, $i, $k)); } return @result; }]]> Rahul Nayak