...any ideas why it does not work with more data like in this code?

Because you pasted code without taking the time to understand what it's doing.

There are resources available: perlintro, perlref, perlreftut, and perldsc.