Select Code to Download

use strict;
use JSON::Tiny 'encode_json';
...
 
print encode_json( $resp );

my $resp = {
    name => $name,
...
    email => $email,
    pass  => $pass,
};