Beefy Boxes and Bandwidth Generously Provided by pair Networks
We don't bite newbies here... much
 
PerlMonks  

Re^4: How to concatenate N binary buffers?

by mantager (Sexton)
on Nov 16, 2012 at 14:45 UTC ( #1004211=note: print w/replies, xml ) Need Help??

Help for this page

Select Code to Download


  1. or download this
    $ ./syswrite_or_concat.pl 1000000
    Double syswrite: 
    timethis 1000000:  2 wallclock secs ( 0.43 usr +  0.94 sys =  1.37 CPU
    +) @ 729927.01/s (n=1000000)
    ...
    timethis 1000000:  1 wallclock secs ( 0.32 usr +  0.45 sys =  0.77 CPU
    +) @ 1298701.30/s (n=1000000)
    Data join:
    timethis 1000000:  1 wallclock secs ( 0.37 usr +  0.46 sys =  0.83 CPU
    +) @ 1204819.28/s (n=1000000)
    
  2. or download this
    #!/usr/bin/env perl
    # ex: set tabstop=4 et syn=perl:
    ...
    
    unlink $file;
    

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://1004211]
help
Chatterbox?
[Corion]: (that module has been deprecated by its author already, so that's fair. Although I wonder why the backtracking can't be fixed to handle the formfeeds gracefully)
[choroba]: not enough tuits?
[Corion]: choroba: Yeah, maybe. I'm also unaware of who uses Email:: modules, but that's more my limited horizon of things ;)
[Corion]: Ah - there even is the replacement of Email::Address::XS , by the bug reporter, which hopefully fixes this bug already ;)

How do I use this? | Other CB clients
Other Users?
Others chanting in the Monastery: (8)
As of 2018-06-20 12:02 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?
    Should cpanminus be part of the standard Perl release?



    Results (116 votes). Check out past polls.

    Notices?