@fields = (current_step => "New" , next_step => "NewFinal" , [etc ... all the identical fields from both scraping the HTML and looking at WD] ); ); unshift @fields, csrf_token => $csrf_token if $csrf_token ; unshift @fields, security_key => $security_key if $security_key ; $res = $ua->request(POST $_[0], \ @fields) ;