Select Code to Download

 "error": {
  "errors": [
...
  "code": 400,
  "message": "items(viewCount)"
 }

sub api_videos { 
use Data::Dumper; 
...
print Dumper({back=>$back});
}

video x not returned
$VAR1 = {
...
                      'iRbqaMfpOrA' => '51'
                    }
        };