$ perl -E'eval "BEGIN { say q{foo} }"' foo $ perl -E'eval "UNITCHECK { say q{foo} }"' foo $ perl -E'eval "CHECK { say q{foo} }"' $ perl -E'eval "INIT { say q{foo} }"' $