Es würde mich eher wundern wenn soetwas ein anderes Ergebnis hat. Beides ist eine while Schleife die solange läuft wie eine bedingung wahr ist, und es wird dafür etwas ausgeführt. Da Perl alles vorher zu Bytecode kompiliert sollte da meiner Ansicht nach auch der gleiche Bytecode dabei heraus kommen.