You are viewing a plain text version of this content. The canonical link for it is here.

Posted to commits@trafficserver.apache.org by hu...@apache.org on 2012/07/19 13:21:38 UTC

svn commit: r1363296 - /trafficserver/site/trunk/cgi-bin/random.cgi

Author: humbedooh
Date: Thu Jul 19 11:21:38 2012
New Revision: 1363296

URL: http://svn.apache.org/viewvc?rev=1363296&view=rev
Log:
taint check and such, thanks to danielsh

Modified:
    trafficserver/site/trunk/cgi-bin/random.cgi

Modified: trafficserver/site/trunk/cgi-bin/random.cgi
URL: http://svn.apache.org/viewvc/trafficserver/site/trunk/cgi-bin/random.cgi?rev=1363296&r1=1363295&r2=1363296&view=diff
==============================================================================
--- trafficserver/site/trunk/cgi-bin/random.cgi (original)
+++ trafficserver/site/trunk/cgi-bin/random.cgi Thu Jul 19 11:21:38 2012
@@ -1,5 +1,5 @@
-#!/usr/bin/perl
-my $response = `curl "https://issues.apache.org/jira/secure/IssueNavigator.jspa?reset=true&jqlQuery=project+%3D+TS+AND+status+%3D+Open+ORDER+BY+priority+DESC&mode=hide"`;
+#!/usr/bin/perl -T
+my $response = `curl 'https://issues.apache.org/jira/secure/IssueNavigator.jspa?reset=true&jqlQuery=project+%3D+TS+AND+status+%3D+Open+ORDER+BY+priority+DESC&mode=hide'`;
 my @matches = ( $response =~ /browse\/(TS\-\d+)/g );
 my $length = $#matches + 1; 
 $length = rand($length);