Help for this page

Select Code to Download

Select or download this

sub generate {
    my $record = shift;
    my $status = shift;
    my %data = %{$_[0]};
    ...