1 files changed, 13 insertions, 0 deletions
diff --git a/perl/Primes.pm b/perl/Primes.pm
new file mode 100644
index 0000000..6843210
--- /dev/null
+++ b/perl/Primes.pm
@@ -0,0 +1,13 @@
+package Primes;
+
+my $last_prime = 2;
+my @primes = (2);
+
+sub sieve {
+	my $n = shift;
+	push @primes, $n;
+	my @copy = @primes;
+	return \@copy;
+}
+
+1;