$ perl -MNew=X=Y::Y::Y.meth,1,2,3 -e'print "$]\n"'
New , X=Y::Y::Y.meth , 1 , 2 , 3
5.006002

$ perl -mNew=X=Y::Y::Y.meth,1,2,3 -e'print "$]\n"'
New , X=Y::Y::Y.meth , 1 , 2 , 3
5.006002