index
:
projecteuler
master
my project euler attempts
summary
refs
log
tree
commit
diff
stats
log msg
author
committer
range
path:
root
/
001.pl
diff options
context:
1
2
3
4
5
6
7
8
9
10
15
20
25
30
35
40
space:
include
ignore
mode:
unified
ssdiff
stat only
Diffstat
(limited to '001.pl')
-rwxr-xr-x
001.pl
5
1 files changed, 5 insertions, 0 deletions
diff --git a/001.pl b/001.pl
new file mode 100755
index 0000000..85a8faa
--- /dev/null
+++ b/
001.pl
@@ -0,0 +1,5 @@
+#!/usr/bin/perl
+use warnings;
+
+$t+=(!($_%5&& $_%3)?$_:0)for(1..999);
+print "$t\n";