It's customary to include the switches in the count as a lot of code can be replaced by switches. For example, switching to say actually saves 3 chars.

     12345678901234
perl -le"print ..."
perl -E"say ..."
     12345678901
[download]