summaryrefslogtreecommitdiffstats
path: root/3.pl
diff options
context:
space:
mode:
authorJesse Luehrs <doy@tozt.net>2009-05-14 19:51:41 -0500
committerJesse Luehrs <doy@tozt.net>2009-05-14 19:51:41 -0500
commitc3ff98ee4aa79bcaa07c8a478e96539c2a512e73 (patch)
tree0b1a04ee7e5b05ec23dcfa274d4258f8acbcdf9d /3.pl
parent394121b98178246a0b1063e9104f8878cf2a17e5 (diff)
downloadprojecteuler-c3ff98ee4aa79bcaa07c8a478e96539c2a512e73.tar.gz
projecteuler-c3ff98ee4aa79bcaa07c8a478e96539c2a512e73.zip
rename files for better sorting
Diffstat (limited to '3.pl')
-rwxr-xr-x3.pl16
1 files changed, 0 insertions, 16 deletions
diff --git a/3.pl b/3.pl
deleted file mode 100755
index 7fbf7ad..0000000
--- a/3.pl
+++ /dev/null
@@ -1,16 +0,0 @@
-#!/usr/bin/perl
-use strict;
-use warnings;
-
-my $num = 317584931803;
-my $test = 3;
-while (1) {
- if ($num % $test) {
- $test += 2;
- }
- else {
- $num /= $test;
- }
- last if $test > sqrt $num;
-}
-print "$num\n";