I can't reproduce your problem. There's no need to escape dollars in single quoted strings.
#!/usr/bin/perl
use strict;
use warnings;
my $decoded_json = {
'version' => '1.0',
'feed' => {
'xmlns' => 'http://www.w3.org/2005/Atom',
'updated' => {
'$t' => '2020-10-16T19:55:33.294Z'
},
'gs$rowCount' => {
'$t' => '1000'
}}};
print $decoded_json->{feed}->{updated}->{'$t'}; # 2020-10-16T19:55:33
+.294Z
How should the code return 2019-07-19 when the structure contains 2020-10-16? Maybe the problems happens in the code you didn't show - how do you create the JSON?
map{substr$_->[0],$_->[1]||0,1}[\*||{},3],[[]],[ref qr-1,-,-1],[{}],[sub{}^*ARGV,3]