Silent prototype mismatch

Does the following make sense?

>perl -wE"sub foo { bar('a','b'); } sub bar($$) { } foo(); say 'done'"
done

Another way to look at it:

>perl -wE"sub bar; sub bar($$) { } say 'done'"
done

>perl -wE"sub bar($); sub bar($$) { } say 'done'"
Prototype mismatch: sub main::bar ($) vs ($$) at -e line 1.
done

• Silent prototype mismatch by Eric Brine
• Re: Silent prototype mismatch by Eric Brine
• Re: Silent prototype mismatch by Peter Martini
• Re: Silent prototype mismatch by Peter Martini