Select Code to Download

    my $buffer .= "x" x 1024 for 0 .. 5;
    print length $buffer;

#!/usr/bin/perl

...
                Rate   push64k_100 append64k_100
push64k_100   22.5/s            --          -76%
append64k_100 94.7/s          320%            --