Thats really good, I completely agree with you on this. There must be some standard. Else what would generally happen is a dozen different keywords would crop up for the very same semantic and that makes Perl code a touch difficult to maintain. Hence the same problem of maintainability keeps coming over and over again.

Coming to your if example, That is not what I mean't. I think I was not clear.Two ways of using a 'if' is perfectly alright. But what if there are a dozen synonyms for if? .What I meant was the following.

say $x if $x > 0;
if $x > 0 {
   say $x;
}
[download]

say $x fi $x > 0;
fi $x > 0 {
   say $x;
}
[download]

say $x on $x > 0;
on $x > 0 {
    say $x;
}
[download]

Now this is just a 'if' example, if this thing gets replicated everywhere don't you think its not the right way forward.

Two ways of using a 'if' is perfectly alright. But what if there are a dozen synonyms for if?

So where is your threshold? How many ways to say the same thing are OK, and at how many it's one too much?

But more to the point, the different OO modules don't do all the same stuff. Using Moose and declaring an attribute doesn't give you the same thing as Class::Accessor::Fast does. (For example Moose also gives you lazy default values and introspection for the attributes).

So there are dozens of ways to write similar but slightly different things, which we have in perl too:

while ($x > 0) {
   say $x;
   last;
}

say $x unless $x <= 0;

$x > 0 && say $x;

# I'm sure you can come up with dozens of examples
# that achieve the same result, but are still
# slightly different.
[download]

Now this is just a 'if' example, if this thing gets replicated everywhere don't you think its not the right way forward.

I agree that there's no point in introducing exact synonyms just for the sake of perceived diversity. But that doesn't compare to all the OO modules, which don't all do the same things.

Perl 6 - links to (nearly) everything that is Perl 6.

So where is your threshold? How many ways to say the same thing are OK, and at how many it's one too much?

I think the current syntax defaults for stuff like if, while etc is OK. But going a bit higher onto things like multi methods, signatures, overloading, grammars have to have some standard or default way of doing. Else the syntax combinations will run into permutations and combinations. And there will far too much complexity to deal with. And since most of them offer same semantic capabilities, the competition will be more on which one has more syntactic sugar.

For a moment keep 'OO' aside, Imagine what would happen if in a single program three different 'if' synonyms, 'switch' synonyms etc Start appearing in a huge code base and one is asked to maintain such code in the DarkPAN. Perl starts to suffer from same decade old 'unmaintainable' infamy.

I'm not telling people must stop experimenting this kind of stuff, in fact we must continue. Neither am I suggesting we must halt at one way of declaring something, that would obviously be wrong. Since once a particular way is chosen and taken and then fears of breaking backward compatibility stops us from correcting past mistakes and those mistakes carry on over time.

We must surely keep new things coming on CPAN. As you suggested pushing things into the core is not a good idea. But the alternate to that is "new syntax through CPAN".However a proper guide/policy is needed as to indicate what is saner/safer to use. Before a lot of code comes out.