Help for this page

Select Code to Download


  1. or download this
    use CGI;
    
    my $q   = CGI->new();
    my $new = 'new';
    my $z   = CGI->$new();
    
  2. or download this
    $ perl -MO=Concise method_dispatch.pl 
    l  <@> leave[1 ref] vKP/REFC ->(end)
    1     <0> enter ->2
    ...
    g              <0> padsv[$new:515,517] s ->h
    j        <0> padsv[$z:516,517] sRM*/LVINTRO ->k
    method_dispatch.pl syntax OK