Detected 1 occurrence(s) of ‘(api|private)[-_]key[ “‘]*=[ =”‘]*\w+': in/perl -w #use strict; use CGI; #$| = 1; use CGI::Carp 'fatalsToBrowser'; use JSON; my $cgi = new CGI; print $cgi->header(); sub sign { my ( $endpoint, $force_ts ) = @_; $force_ts = $force_ts || 0; # Replace these values. my $API_KEY = 'this-is-my-key'; my $API_SECRET = 'this-is-my-secret'; […]
↧
