#23456789012
die-s pop,$/
[download]

~Particle *accelerates*

I'm very new to golf and don't know the ground rules and was amazed by hans_moleman's solution and simply blown away by japhy's evolution, but.... (/me hear's the groans)...trying japhy's final answer on my win32 (that has -w permenantly enabled) system I got:

C:\test>185653 185653.pl
16Use of uninitialized value in print at C:\test\185653.pl line 1.

C:\test>
[download]

Ignoring the warning which I could turn off, I noticed that it reports its own length (under win32 etc. etc) as 16!

So, I played and came up with this, which (on my Wi...) does a little better and (visually at least :) complies with the 'rules'

(I see a newline after the number :),

and beats japhy's by 3!...and runs with -w and no errors!

C:\test>185649 185649.pl
13
C:\test>
[download]

And the code

C:\test>type 185649.pl
print-s pop

C:\test>
[download]

As an aside, in a unicode world, maybe the requirements should have been "number of bytes"?

Ahh, certainly this is cheating BrowserUk {grin}.

The version of emulated DOS on your Win32 system always places new command prompt on a separate line by itself. So, even if your perl script prints just '13' without a terminating '\n', DOS would do the job for you.

However, for a Unix system I can't see how one could go shorter than just:

#12345678901234
 print-s pop,$/
[download]

Which is 14 characters.

Surely, had japhy considered writing his golf for DOS, then the ',$/' part would be dropped thereby reducing the golf even further by 3 characters as you've pointed out ;-)

Update: To clarify, the word 'cheating' should be considered a sarcasm ;^). I didn't mean to sound offending. I very much respect BrowserUk's comment and have nothing against him pointing out the intimate features of perl running on various non *nix systems. I simply felt it would be worthwhile to also direct your attention to the minor difference in running the golf piece on Win32 and Unix systems.

_____________________

# Under Construction
[download]

$ echo -n 'print-s pop,$/' > golf
$ perl golf golf
14
[download]

As japhy didn't specify a newline at the end, I assume he didn't want one. :-)

-sauoq
"My two cents aren't worth a dime.";

Cheating? Possibly, except is

Fully utilizing implied and default behaviours....

One possibly definition of the word perlish?

If so, does this desirability stop at Perl's front (or back) door? :^p

---

On a slightly serious note, if you run japhy's mini masterpiece on itself on a *nix box, what does it report its own length to be? 14|15|16??

I assume this will depend on whether the editor used to create the file automatically terminates the last (only) line, and how it is terminated?

Thanks! very enlightening.