Sha256: aee6a4b7e88da9ec45ffa056092a02b05d602221a8b186187aa25cb079f7f293

Contents?: true

Size: 364 Bytes

Versions: 323

Compression:

Stored size: 364 Bytes

Contents

package Example;
use strict;
use warnings;

sub factors {
    my ($num) = @_;

	return [] if $num == 1;
    my @factors;
    my $i = 2;
	while ($i*$i <= $num) {
		my $div = $num/$i;
	    if ($div == int $div) {
            push @factors, $i;
            $num = $div;
            next;
        }
        $i++;
	}
	push @factors, $num;

    return \@factors;
}

1;

Version data entries

323 entries across 323 versions & 1 rubygems

Version Path
trackler-2.2.1.25 tracks/perl5/exercises/prime-factors/Example.pm
trackler-2.2.1.24 tracks/perl5/exercises/prime-factors/Example.pm
trackler-2.2.1.23 tracks/perl5/exercises/prime-factors/Example.pm
trackler-2.2.1.22 tracks/perl5/exercises/prime-factors/Example.pm
trackler-2.2.1.21 tracks/perl5/exercises/prime-factors/Example.pm
trackler-2.2.1.20 tracks/perl5/exercises/prime-factors/Example.pm
trackler-2.2.1.19 tracks/perl5/exercises/prime-factors/Example.pm
trackler-2.2.1.18 tracks/perl5/exercises/prime-factors/Example.pm
trackler-2.2.1.17 tracks/perl5/exercises/prime-factors/Example.pm
trackler-2.2.1.16 tracks/perl5/exercises/prime-factors/Example.pm
trackler-2.2.1.15 tracks/perl5/exercises/prime-factors/Example.pm
trackler-2.2.1.14 tracks/perl5/exercises/prime-factors/Example.pm
trackler-2.2.1.13 tracks/perl5/exercises/prime-factors/Example.pm
trackler-2.2.1.12 tracks/perl5/exercises/prime-factors/Example.pm
trackler-2.2.1.11 tracks/perl5/exercises/prime-factors/Example.pm
trackler-2.2.1.10 tracks/perl5/exercises/prime-factors/Example.pm
trackler-2.2.1.9 tracks/perl5/exercises/prime-factors/Example.pm
trackler-2.2.1.8 tracks/perl5/exercises/prime-factors/Example.pm
trackler-2.2.1.7 tracks/perl5/exercises/prime-factors/Example.pm
trackler-2.2.1.6 tracks/perl5/exercises/prime-factors/Example.pm