Indeed saving the query in a file and doing a system that sets the REMOTE_USER environment variable and run the script using the query as input gives me the right remote_user() in the script... but still doesn't get the parameters right.

    my( $new_fh, $new)= mkstemp( '/var/tmp/generate_new.XXXXX' );
    print {$new_fh} $req->content;
    close $new_fh;
    
    my $user= remote_user();
    system( "export REMOTE_USER=$user; cat $new | $SCRIPT") # probably
+ qualyfies as useless use of cat ;--)
      && exit_status( "problem running $SCRIPT: $!");
    unlink( $new) or exit_status( "Warning: could not unlink temp file
+ $new $!");
[download]