Help for this page
use Filter::Util::Call; BEGIN{ filter_add(sub{ ... $s; }); } print "hello, world\n";