note
srawls
This is my very first golf attempt, and I know it's pretty bad, but here it goes: <p>
Well, it does return duplicates (2 2 5 5 7 7) since I use a hash, but I didn't see anything in the problem that said you couldn't. I count 77 chars (see update). (Note: that is excluding the new-lines, I ran it with out them, but I posted new lines here to be more pleasing to the eye, also, it is excluding the sub a { and the end } parts).
<code>
sub a {
@a{2..$_[0]}=2..$_[0];
for$b(%a){!($b%$_)&&$b!=$_&&delete@a{$b}for(%a)}
%a
}
</code>
One last note, since this is my first golf, I would very much appreciate any suggestions or improvements to my code. I realize I took a very straight forward approach to this solution, but that is how I think.
<p>
<strong>Update:</strong>Took it down to 73 chars. I took out one set of un-needed parenentheses and two un-needed semicolons.<p>
<strong>Note:</strong>If you put keys before the %a it takes away the problem of repeats, but it brings me back to where I started with 77 chars.
<BR><BR>The 15 year old, freshman programmer,<BR>
Stephen Rawls
81695
81695