sub my_subroutine {
    print "In a subroutine.\n";
}

print "Before subroutine.\n";

&my_subroutine;

print "After subroutine.\n";