programming-examples/perl/Subroutine/Call subroutine with parameter by using its reference.pl

$codereference = sub {print shift};

&$codereference("Hello!\n");