Bareword found where operator expected at 11.pl line 17, near 1586iY2vSfT5EeuQTMYj6kwnbfN255KX2T
<Missing operator before iY2vSfT5EeuQTMYj6kwnbfN255KX2T?>
syntax error at 11.pl line 17 near, "1586iY2vSfT5EeuQTMYj6kwnbfN255KX2T"


##</code><code>##


my $req = HTTP::Request->new(GET => 'https://blockchain.info/balance?active=1586iY2vSfT5EeuQTMYj6kwnbfN255KX2T');
$req->content_type('application/json');
my $res = $ua->request($req);
$respns = JSON::XS->new->decode ($res->content);
$k= $respns->{1586iY2vSfT5EeuQTMYj6kwnbfN255KX2T}->{n_tx};

print $k;