use CGI::Simple;

my $q = CGI::Simple->new;

my %input = $q->Vars;

print $q->unescapeHTML( $input{'app_name'} );