# TODO perl like header

.sub main :main
.end