Tại sao phải mất quá nhiều thời gian để in "\ n" trong Perl?

Question

Tại sao phải mất quá nhiều thời gian để in một dòng mới? Đây có phải là máy của tôi, hoặc làm những người khác nhìn thấy cùng một hiệu ứng?

Với newline:

#!/usr/bin/perl 

use strict; 
use Benchmark; 

    timethis(100000,'main();'); 


    sub main { 
     print "you are the bomb. \n"; 
    } 


    # outputs: 
    # timethis 100000: 8 wallclock secs (0.15 usr + 0.45 sys = 0.60 CPU) @ 166666.67/s (n=100000) 

W/o newline:

#!/usr/bin/perl 

use strict; 
use Benchmark; 

    timethis(100000,'main();'); 


    sub main { 
     print "you are the bomb. "; 
    } 


    # outputs: 
    # timethis 100000: 0 wallclock secs (0.09 usr + 0.04 sys = 0.13 CPU) @ 769230.77/s (n=100000) 
    #  (warning: too few iterations for a reliable count) 

Edit: tôi muốn thêm rằng việc đặt hai "\ n" gây ra việc thực hiện để mất gấp hai lần, ít nhất là cho các giây xung quanh.

timethis 100000: 16 wallclock secs (0.15 usr + 0.52 sys = 0.67 CPU) @ 149253.73/s (n=100000) 

Answer 1

Tôi không nghĩ rằng bộ đệm có nhiều việc phải làm với nó. Tôi đoán nó là bởi vì các thiết bị đầu cuối cần phải di chuyển khi bạn in một dòng mới cho nó (hoặc in đủ ký tự để điền vào một dòng). Khi tôi chuẩn các hàm này ghi vào một tệp hoặc tới /dev/null, không có nhiều khác biệt.

use Benchmark; 
timethis(1000000, 'main'); 
timethis(1000000, 'main2'); 
select STDERR; $| = 0; select STDOUT; # enable buffering on STDERR 
sub main { print STDERR "you are the bomb. \n" } 
sub main2 { print STDERR "you are the bomb. " } 

$ perl benchmark.pl 2> a_file 
timethis 1000000: 21 wallclock secs (4.67 usr + 13.38 sys = 18.05 CPU) @ 55410.87/s 
timethis 1000000: 21 wallclock secs (4.91 usr + 13.34 sys = 18.25 CPU) @ 54797.52/s 

$ perl benchmark.pl 2> /dev/null 
timethis 1000000: 26 wallclock secs (2.86 usr + 10.36 sys = 13.22 CPU) @ 75648.69/s 
timethis 1000000: 27 wallclock secs (2.86 usr + 10.30 sys = 13.16 CPU) @ 76010.95/s 

$ perl benchmark.pl 2> a_file  (without buffering) 
timethis 1000000: 29 wallclock secs (3.78 usr + 12.14 sys = 15.92 CPU) @ 62806.18/s 
timethis 1000000: 29 wallclock secs (3.27 usr + 12.51 sys = 15.78 CPU) @ 63367.34/s 

$ perl benchmark.pl 2> /dev/tty (window has 35 lines and buffers 10000, YMMV) 
[ 200000 declarations of how you are a bomb deleted ] 
timethis 100000: 53 wallclock secs (0.98 usr + 3.73 sys = 4.72 CPU) @ 21190.93/s 
timethis 100000: 9 wallclock secs (0.36 usr + 1.94 sys = 2.30 CPU) @ 43535.05/s 

Tóm tắt: thêm xả làm giảm hiệu suất khoảng 10%. Cuộn thêm trên thiết bị đầu cuối làm giảm hiệu suất khoảng 50%.

Answer 2

Newline flushes output.

Trong hầu hết các trường stdio, đệm khác nhau với các loại thiết bị đầu ra ... các thiết bị nối tiếp, bao gồm thiết bị đầu cuối, modem, chuột, và cần điều khiển, thường dòng đệm; stdio sẽ gửi toàn bộ dòng ra chỉ khi nó được xuống dòng

Answer 3

Nó không phải là \n cho mỗi gia nhập gây ra vấn đề này. Thay vào đó, các cuộc gọi liên tiếp đến print được hệ điều hành đệm cho đến khi gặp phải ký tự \n hoặc bộ đệm đầy. Tại thời điểm đó, bộ đệm đầu ra được flushed vào màn hình. Việc làm sạch đầu ra cho màn hình là một hoạt động tốn kém (tương đối), vì vậy vòng lặp mà bạn xả bộ đệm đầu ra nhiều lần có hiệu suất chậm hơn nhiều so với vòng lặp mà bạn chỉ xóa bộ đệm một lần ở cuối (điều này sẽ xảy ra khi bạn thoát khỏi chương trình).