Select Code to Download

#include "EXTERN.h"
#include "perl.h"
...
        RETVAL = amd->stash;
    OUTPUT:
        RETVAL

package AddrMatch;
...
    my $what = $state->{what};
    $state{how} = "now";
}