http://qs321.pair.com?node_id=523194


in reply to Re^4: How can you sysread an entire file?
in thread How can you sysread an entire file?

It won't affect your IO count but

my $rec;foreach(@test){$rec.=$_."\n";}

Is much better coded as

my $rec = join "\n", @test;

roughly 3 times faster on 1000 elements.


Examine what is said, not who speaks -- Silence betokens consent -- Love the truth but pardon error.
Lingua non convalesco, consenesco et abolesco. -- Rule 1 has a caveat! -- Who broke the cabal?
"Science is about questioning the status quo. Questioning authority".
In the absence of evidence, opinion is indistinguishable from prejudice.