use strict;
use warnings;

use Test::More tests => 1;
use Test::NoWarnings;

use JSON;

my $text = 'file.jpg|fileid|no_file&param_two=1|1|2|2';

eval {
    my $temp = from_json ($text);
} or do {
    print "# Not JSON\n";
};