>perl -wle"$MyApp::once{x} ||= 1;"
Name "MyApp::once" used only once: possible typo at -e line 1.

>perl -wle"%MyApp::once if 0; $MyApp::once{x} ||= 1;"

>