Help for this page

Select Code to Download


  1. or download this
    use strict;
    my $szBlock  = q( sub {
    ...
    # Now we call the subroutine by "dereferencing" the reference in $subr
    +ef
    # 
    print &$subref;
    
  2. or download this
    y greater