Define a SUbroutine within Embperl

Here we define a subroutine

NOTE: It must be defined within [! ... !] to avoid redefinition! Now we call the subroutine: Hello world

Ok.