| 0){
$buffer = $ENV{'QUERY_STRING'};
@pairs = split(/&/, $buffer);
foreach $pair (@pairs){
($name, $value) = split(/=/, $pair);
$value =~ s/%([a-fA-F0-9][a-fA-F0-9])/pack("C", hex($1))/eg;
$in{$name} = $value;
}
}
$match = $in{'match'};
$row = $in{'row'};
#print "Status: 302 Redirection\n";
#print "Location: http://www.ccontrols.com/reply7.htm\n\n";
print "content-type: text/html \n\n";
#print $ENV{'QUERY_STRING'};
#print "Cookie:";
#show the cookie
$rcvd_cookies = $ENV{'HTTP_COOKIE'};
#@cookies = split /;/, $rcvd_cookies;
#foreach $cookie (@cookies)
#{
# print $cookie;
#}
#print $rcvd_cookies;
#print "cookie-test";
@cookies = split /\+/, $rcvd_cookies;
($name, $value) = split(/=/, $cookies[0]);
if ($name eq "product_selected")
{
if ($match eq $value)
{
print "class=\"td-selected\"";
exit();
}
}
if ($row eq "white")
{
print "";
}
if ($row eq "dark")
{
print "class=\"td-item\"";
}
>ANA* |
0){
$buffer = $ENV{'QUERY_STRING'};
@pairs = split(/&/, $buffer);
foreach $pair (@pairs){
($name, $value) = split(/=/, $pair);
$value =~ s/%([a-fA-F0-9][a-fA-F0-9])/pack("C", hex($1))/eg;
$in{$name} = $value;
}
}
$match = $in{'match'};
$row = $in{'row'};
#print "Status: 302 Redirection\n";
#print "Location: http://www.ccontrols.com/reply7.htm\n\n";
print "content-type: text/html \n\n";
#print $ENV{'QUERY_STRING'};
#print "Cookie:";
#show the cookie
$rcvd_cookies = $ENV{'HTTP_COOKIE'};
#@cookies = split /;/, $rcvd_cookies;
#foreach $cookie (@cookies)
#{
# print $cookie;
#}
#print $rcvd_cookies;
#print "cookie-test";
@cookies = split /\+/, $rcvd_cookies;
($name, $value) = split(/=/, $cookies[0]);
if ($name eq "product_selected")
{
if ($match eq $value)
{
print "class=\"td-selected\"";
exit();
}
}
if ($row eq "white")
{
print "";
}
if ($row eq "dark")
{
print "class=\"td-item\"";
}
> |
0){
$buffer = $ENV{'QUERY_STRING'};
@pairs = split(/&/, $buffer);
foreach $pair (@pairs){
($name, $value) = split(/=/, $pair);
$value =~ s/%([a-fA-F0-9][a-fA-F0-9])/pack("C", hex($1))/eg;
$in{$name} = $value;
}
}
$match = $in{'match'};
$row = $in{'row'};
#print "Status: 302 Redirection\n";
#print "Location: http://www.ccontrols.com/reply7.htm\n\n";
print "content-type: text/html \n\n";
#print $ENV{'QUERY_STRING'};
#print "Cookie:";
#show the cookie
$rcvd_cookies = $ENV{'HTTP_COOKIE'};
#@cookies = split /;/, $rcvd_cookies;
#foreach $cookie (@cookies)
#{
# print $cookie;
#}
#print $rcvd_cookies;
#print "cookie-test";
@cookies = split /\+/, $rcvd_cookies;
($name, $value) = split(/=/, $cookies[0]);
if ($name eq "product_selected")
{
if ($match eq $value)
{
print "class=\"td-selected\"";
exit();
}
}
if ($row eq "white")
{
print "";
}
if ($row eq "dark")
{
print "class=\"td-item\"";
}
>ARCNET Network Analyzer |
0){
$buffer = $ENV{'QUERY_STRING'};
@pairs = split(/&/, $buffer);
foreach $pair (@pairs){
($name, $value) = split(/=/, $pair);
$value =~ s/%([a-fA-F0-9][a-fA-F0-9])/pack("C", hex($1))/eg;
$in{$name} = $value;
}
}
$match = $in{'match'};
$row = $in{'row'};
#print "Status: 302 Redirection\n";
#print "Location: http://www.ccontrols.com/reply7.htm\n\n";
print "content-type: text/html \n\n";
#print $ENV{'QUERY_STRING'};
#print "Cookie:";
#show the cookie
$rcvd_cookies = $ENV{'HTTP_COOKIE'};
#@cookies = split /;/, $rcvd_cookies;
#foreach $cookie (@cookies)
#{
# print $cookie;
#}
#print $rcvd_cookies;
#print "cookie-test";
@cookies = split /\+/, $rcvd_cookies;
($name, $value) = split(/=/, $cookies[0]);
if ($name eq "product_selected")
{
if ($match eq $value)
{
print "class=\"td-selected\"";
exit();
}
}
if ($row eq "white")
{
print "";
}
if ($row eq "dark")
{
print "class=\"td-item\"";
}
>$2,495 |
0){
$buffer = $ENV{'QUERY_STRING'};
@pairs = split(/&/, $buffer);
foreach $pair (@pairs){
($name, $value) = split(/=/, $pair);
$value =~ s/%([a-fA-F0-9][a-fA-F0-9])/pack("C", hex($1))/eg;
$in{$name} = $value;
}
}
$match = $in{'match'};
$row = $in{'row'};
#print "Status: 302 Redirection\n";
#print "Location: http://www.ccontrols.com/reply7.htm\n\n";
print "content-type: text/html \n\n";
#print $ENV{'QUERY_STRING'};
#print "Cookie:";
#show the cookie
$rcvd_cookies = $ENV{'HTTP_COOKIE'};
#@cookies = split /;/, $rcvd_cookies;
#foreach $cookie (@cookies)
#{
# print $cookie;
#}
#print $rcvd_cookies;
#print "cookie-test";
@cookies = split /\+/, $rcvd_cookies;
($name, $value) = split(/=/, $cookies[0]);
if ($name eq "product_selected")
{
if ($match eq $value)
{
print "class=\"td-selected\"";
exit();
}
}
if ($row eq "white")
{
print "";
}
if ($row eq "dark")
{
print "class=\"td-item\"";
}
> |