#!/usr/bin/perl require "alib.pl"; # Configure All path in this File. my ($name, $value); foreach (split(/&/, $ENV{'QUERY_STRING'})) { tr/+/ /; s/%([0-9a-fA-F]{2})/pack("c",hex($1))/ge; ($name, $value) = split(/=/, $_); $in{$name}=$value; } print "Content-type: text/html\n\n"; print &Adverts(time, $in{'lg'}, $in{'kw'});
|
Contests news and announcements: |
|
|
|
Currently opened contests: |
|
| Contest No: Name | Difficulty / Period |
| B is for Beginners I is for Intermediate A is for Advanced You can participate in every contest you want. There is no limit. Please, read our Contests FAQ for more information. Contests which have "***" after the name, means that there is a free prize for the winner of the contest!
|
#!/usr/bin/perl
require "alib.pl"; # Configure All path in this File.
my ($name, $value);
foreach (split(/&/, $ENV{'QUERY_STRING'})) {
tr/+/ /;
s/%([0-9a-fA-F]{2})/pack("c",hex($1))/ge;
($name, $value) = split(/=/, $_);
$in{$name}=$value;
}
print "Content-type: text/html\n\n";
print &Adverts(time, $in{'lg'}, $in{'kw'});
Advertise
on C++ Home | Privacy Policy/Disclaimer
| Contact Us
Hosted By: HostRocket.Com
Copyright © 2001-2002 www.cpp-home.com
All rights reserved.