print; =org * TODO whatever ... ** =cut print; #### sub ORG ($) { } print; ORG <<''; * TODO whatever ... ** print;