3 lines
68 B
Perl
3 lines
68 B
Perl
$codereference = sub {print shift};
|
|
|
|
$codereference->("Hello!\n"); |
$codereference = sub {print shift};
|
|
|
|
$codereference->("Hello!\n"); |