Pixel Pedals of Tomakomai

北海道苫小牧市出身の初老の日常

2005-03-04から1日間の記事一覧

CORE::GLOBAL::printのオーバーライド

BEGIN{ *CORE::GLOBAL::die = sub {CORE::die " my die: ", @_}; *CORE::GLOBAL::warn = sub {CORE::warn " my warn: ", @_}; *CORE::GLOBAL::print = sub {CORE::print "my print: ", @_}; } print "call print\n"; warn "call warn\n"; die "call die\n";…