From c3ff98ee4aa79bcaa07c8a478e96539c2a512e73 Mon Sep 17 00:00:00 2001 From: Jesse Luehrs Date: Thu, 14 May 2009 19:51:41 -0500 Subject: rename files for better sorting --- 001.pl | 5 +++++ 1 file changed, 5 insertions(+) create mode 100755 001.pl (limited to '001.pl') 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"; -- cgit v1.2.3-54-g00ecf