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


in reply to The print is output later after die

STDOUT which print uses by default is buffered. die outputs to STDERR which is not buffered, therefore it shows immediately.

The buffering can be turned off:

#!/usr/bin/perl use warnings; use strict; # Uncomment to change the order: # *STDOUT->autoflush; print "abc"; die "ABC";

map{substr$_->[0],$_->[1]||0,1}[\*||{},3],[[]],[ref qr-1,-,-1],[{}],[sub{}^*ARGV,3]