in reply to <STDIN> input
When you assign <STDIN> to a scalar, you're asking for one line only. You could assign it to an array, which gets all lines until EOF:
my @input = <STDIN>;
Making the input separator undef should work, too. Are you sure you're setting the input separator $/ and not the output separator $\?
-xdg
Code written by xdg and posted on PerlMonks is public domain. It is provided as is with no warranties, express or implied, of any kind. Posted code may not have been tested. Use of posted code is at your own risk.
|
|---|