7 lines
93 B
Perl
7 lines
93 B
Perl
sub first {shift->()}
|
|
|
|
sub second {'second'}
|
|
|
|
print first \&second;
|
|
|
|
print first sub{'sub'};
|