C:\test>perl -nwle"print $n = +(split)"
Use of implicit split to @_ is deprecated at -e line 1.
Name "main::n" used only once: possible typo at -e line 1.
foo
1
foo bar
2