Re^3: Append JSON (from hashref)

Yes.

See perldsc on how to manipulate Perl data structures.

You could either add your entry to the result directly, in your Perl code:

$tmp->[0]->{ 'inputPhrase' } = $SearchWord;
[download]

... or simply select the search phrase as another column:

SELECT RECNO, DESCRIPTION, ? as inputPhrase
FROM RECORDS_TABLE
WHERE RECNO LIKE ?
[download]

...
$sth->execute( $SearchWord, $recno );
...
[download]

Comment on Re^3: Append JSON (from hashref) Select or Download Code

Replies are listed 'Best First'.
Re^4: Append JSON (from hashref) by Anonymous Monk on Apr 06, 2017 at 13:29 UTC
Thanks, but this first solution means inputPhrase is added in with the details of the first result `[{"DESCRIPTION":"Description of record","RECNO":"RECORDNumber", "input +Phrase":"RECORDNumber}, ... more records here` [download] and not outside of the list of results like in the json linked above (won't let me post with the URL here)	[reply] [d/l]
Re^5: Append JSON (from hashref) by Corion (Patriarch) on Apr 06, 2017 at 13:32 UTC
Ah, if you want a different structure, just create that structure. Consider writing your data structure in Perl - Perl looks very much like JSON, except that `:` is spelled `=>` in Perl.	[reply] [d/l] [select]
Re^6: Append JSON (from hashref) by Anonymous Monk on Apr 06, 2017 at 15:36 UTC
Can you give some advice on preping this in perl, so far my attempt is failing to produce a structure required: `while (my $row = $sth->fetchrow_hashref) { print "doc_no: $row->{RECNO} DESCRIPTION: $row->{DESCRIPTION}\n"; $hash{$int} = '"RECNO": "' . $row->{RECNO} . '","DESCRIPTION": "' . +$row->{DESCRIPTION} .'"'; $int ++; } # figure out how to add inputPhrase later.` [download] Is there a structure I can use which means I don't have to have the $int part?	[reply] [d/l]
Re^7: Append JSON (from hashref) by Corion (Patriarch) on Apr 07, 2017 at 06:12 UTC
Re^7: Append JSON (from hashref) by huck (Prior) on Apr 06, 2017 at 15:51 UTC
Re^8: Append JSON (from hashref) by Anonymous Monk on Apr 07, 2017 at 13:12 UTC
Re^7: Append JSON (from hashref) by AnomalousMonk (Archbishop) on Apr 06, 2017 at 19:41 UTC


Problems? Is your data what you think it is?
	PerlMonks