#!/usr/bin/perl

use strict;

{
    local $ENV{REQUEST_METHOD} = "GET";
    local $ENV{QUERY_STRING} = "query_string_for_stats_prog";
    system("stats.cgi");
}