I don't know about JSON, but an alternative (and possibly fragile) approach using a regex and eval would be:

>perl -wMstrict -le
"my $js = q{[{feedId:6161,feedType:'forum'},{feedId:1469,feedType:'cat
+egory'}]};
 $js =~ s{ : }{ => }xmsg;
 print $js;
 my @array = eval qq{ \@{ $js } };
 use Data::Dumper;
 print Dumper \@array;
"
[{feedId => 6161,feedType => 'forum'},{feedId => 1469,feedType => 'cat
+egory'}]
$VAR1 = [
          {
            'feedId' => 6161,
            'feedType' => 'forum'
          },
          {
            'feedId' => 1469,
            'feedType' => 'category'
          }
        ];
[download]

Note that you had better trust your input data pretty well if you take an approach like this.