10 lines
141 B
Perl
10 lines
141 B
Perl
|
sub my_subroutine {
|
||
|
|
print "In a subroutine.\n";
|
||
|
|
}
|
||
|
|
|
||
|
|
print "Before subroutine.\n";
|
||
|
|
|
||
|
|
&my_subroutine;
|
||
|
|
|
||
|
|
print "After subroutine.\n";
|