Select Code to Download

package Template::Secure;

...
    return $ret;
}

# a bit hacky way to redefine subs without modifying sources; this
# code can be put directly into Template::Secure module
...
    };

}

#!/usr/bin/perl -T

...
</body>
</html>

#!/usr/bin/perl -T

...
Hello, [% HTML.escape(name) %]!
</body>
</html>