http://www.perlmonks.org?node_id=185649

We're golfing in the cube farm today, I'm writing Perl code and my adversary is writing PHP. So far he's got me by one character on this one, but I can't see how I can make it any shorter.

The program must take a file name from the command line and return the number of characters in the file. Not the most ambitious requirements in the world for sure :). A newline at the end of the program output is required.

It would be nice if I could (get help) figuring out a way to restore Perl's bragging rights...


print((stat pop)[7],$/)