in reply to two + 2 not equal 4!
Tip #6 from the Basic debugging checklist: use B::Deparse to see if your code really is what you think it is:
$ perl -MO=Deparse two.pl BEGIN { $^W = 1; } sub two { use strict 'refs'; 2; } use strict 'refs'; printf "two + 2 = %d\n", two(2);
So, two + 2 is interpreted as two(2). Instead of evaluating your function, then adding 2, perl treats everything after your function call as a LIST of arguments when you omit the parentheses. From perlsub:
2. NAME LIST; # Parentheses optional if predeclared/imported.
While it is legal syntax to omit the parentheses on function calls, it is a good practice to use them, even if your function does not need arguments:
printf "two + 2 = %d\n",two() + 2;
As a side note, your code would render better if you replace your "pre" tags with "code" tags: Writeup Formatting Tips
In Section
Seekers of Perl Wisdom