was auch immer du willst ich denke erstmal es geht in perl aber das return innerhalb des schleifenblocks ist wohl nicht genau was du willst. versuch erstmal genauer aufzuschreiben was du überhaupt möchtest.