my %fields_to_show = map { $_ => 1 } qw/field1 field2 field3/;

##</code><code>##

foreach my $f (@{ $self->{Field_Order} }) {
    next unless exists $fields_to_show{$f};
    
    my $val = (defined $self->{Form}{$f} ? $self->{Form}{$f} : '');
    $self->success_page_field( 
        $self->escape_html($f), 
        $self->escape_html($val) 
    );
}