Create JSON format from two strings in PERL

Question

I've two string like follows in PERL script.

$labels = "firstname|lastname|email";

$values = 'krishna|mohan|[email protected]';

Now I would like to construct a JSON fromat from those two srings. I need to split (explode) both the strings base on | (pipe) symbol and construct a JSON format like follows

{"firstname":"krishna","lastname":"mohan","email":"[email protected]"}

How can I achieve this? Any Ideas would be much appreciated.

@j{ split /\|/, $labels } = split /\|/, $values;

mpapec
– mpapec

2014-11-27 13:41:47 +00:00
Commented Nov 27, 2014 at 13:41 — mpapec
– mpapec, Commented Nov 27, 2014 at 13:41

choroba · Accepted Answer · 2014-11-27 13:46:40Z

3

Use split to "explode" the strings, build a hash from the results. Then, use JSON to translate it to JSON:

#!/usr/bin/perl
use warnings;
use strict;

use JSON;

my $labels = 'firstname|lastname|email';
my $values = 'krishna|mohan|[email protected]'; # Doesn't work with double quotes!

my %hash;
@hash{ split /\|/, $labels } = split /\|/, $values;

print to_json(\%hash);

answered Nov 27, 2014 at 13:46

choroba

245k27 gold badges221 silver badges304 bronze badges

Sign up to request clarification or add additional context in comments.

Collectives™ on Stack Overflow

Create JSON format from two strings in PERL

1 Answer 1

Comments

Your Answer

Hot Network Questions

Collectives™ on Stack Overflow

1 Answer 1

Comments

Your Answer

Sign up or log in

Post as a guest

Related