Die Warnung klommt, weil Perl denkt, du hättest dich verschrieben weil die Variable nur einmal im Package verwendet wird. Manchmal ist Perl eben übervorsichtig. ;)

Ich habe doch gezeigt, dass ein nochmaliges benutzen der $main::zahl in der sub dazu führt, dass keine Warnung mehr kommt.