Help for this page

Select Code to Download


  1. or download this
    package TestPkg;
    use Dispatch;
    ...
    package main;
    my $table = create_dptable TestPkg; # or TestPkg::create_dptable();
    $table->{sub_c}->("Hello!");
    
  2. or download this
    package Dispatch;
    
    ...
    }
    
    1;