programming-examples/perl/Subroutine/Using return statement.pl

print "${&getmessage}";

sub getmessage {
    $msg = "Hello!";
    return "msg"
};