Accept: text/html,application/xhtml+xml,application/xml;q=0.9,image/avif,image/webp,image/apng,*/*;q=0.8,application/signed-exchange;v=b3;q=0.9
Accept-Encoding: gzip, deflate, br
Accept-Language: en-US,en;q=0.9
Cache-Control: max-age=0
Connection: keep-alive
Content-Length: 30
Content-Type: application/x-www-form-urlencoded
Cookie: plack_session=ba1d0d240ba3ed6c6fca13c240c758a6c812200d
Host: testchandan.com:5001
Origin: https://testchandan.com:5001
Referer: https://testchandan.com:5001/?code=M-asK8wDQ7gE6BKdqUBOdTQPoH2gMrLF4dcH3XDodNE&state=1234
Sec-Fetch-Dest: document
Sec-Fetch-Mode: navigate
Sec-Fetch-Site: same-origin
Sec-Fetch-User: ?1
Upgrade-Insecure-Requests: 1
User-Agent: Mozilla/5.0 (Windows NT 10.0; Win64; x64) AppleWebKit/537.36 (KHTML, like Gecko) Chrome/88.0.4324.104 Safari/537.36
####
package webapp;
use Dancer2;
use Op;
our $VERSION = '0.1';
my $r2;
get '/' => sub {
#&client1;
template 'query2' => { 'title' => 'webapp' };
};
post '/'=> sub {
$r2 = Op::result4({OKTAUsersList => param('OKTA-Users-List'),
Email => param('Email')});
template result4 => { title => 'webapp', result4 => $r2 }
};
true;