#!/usr/bin/perl ### Cookies $hostip = $ENV{'REMOTE_ADDR'}; require '../cookie.lib'; $cartid = "nocookies"; if (&GetCookies('cart')) { $cartid = $Cookies{'cart'}; } else { ($sec,$min,$hr,$mday,$mon,$year,$wday,$yday,$isdst) = localtime(time); $cartid = "$sec$hr$min.$hostip"; &SetCookies('cart',$cartid); } # if (not &GetCookies('cart')) { # $cartid = "nocookies"; # } ##################################################### print "Content-type:text/html\n\n"; $start = 0; $deptid = "ssmom"; @values = split(/&/,$ENV{'QUERY_STRING'}); foreach $i (@values) { ($varname, $mydata) = split(/=/,$i); if ($varname eq "start") { $start = $mydata; } } open(FILE, "../data.dat") || die &error_file; while() { chomp; @datafile = split(/\n/); foreach $line (@datafile) { next if /#.*/; ($depart, $prodid, $prodtitle, $proddetail, $prodprice, $prodimage, $prodthumb, $s1, $s2, $s3, $t1, $wsprice, $wsunit, $wsmin, $rtla, $wsa, $prodbrief) = split(/::/, $line); if ($deptid eq $depart && $rtla eq "1") { push(@pdp,$depart); push(@pid,$prodid); push(@ptl,$prodtitle); push(@pdt,$proddetail); push(@ppr,$prodprice); push(@pim,$prodimage); push(@ptm,$prodthumb); push(@wsu,$wsunit); push(@wsm,$wsmin); push(@pbf,$prodbrief); } } } close(FILE); $noofitems = scalar(@pdp); $noofpages = 1 + int($noofitems/10); if (int($noofitems / 10) == $noofitems / 10) { $noofpages = $noofpages - 1; } if (int($start / 10) != $start / 10) { $start = 0; } if ($start > $noofitems) { $start = 0; } $htmltitle = "Personalized Sterling Silver Necklace for Mothers - The Princess Store"; $max = $#pdp; print < $htmltitle
The Princess Store
 
View Your CartHelp and SupportContact InformationAbout The Princess Store



Search
 



EndOfHTML open (LEFTNAV,"../leftnav.dat") || print "Could not open file \n"; while () { print $_; } close(LEFTNAV); print <

Wholesale Resellers


Home - Mothers Jewelry - Sterling Silver Necklace Letter Blocks

 Sterling Silver Necklace Letter Blocks

Create a custom sterling silver necklace for Mom! Our sterling silver chain necklaces, complete with sterling silver letter charm blocks and spacers, can spell out any name or set of names. Free shipping is available when you buy \$50 or more.

EndOfHTML print "\n"; $iii = $start; $number = 1; while($iii <= $max && $number <= 10) { print "\n"; print "\n"; print "\n"; if ($ptm[$iii+1] eq "") { print "\n"; print "\n"; print "\n"; print "\n"; print "\n"; if ($ptm[$iii+1] eq "") { print "
\n"; print "$ptl[$iii]
\n"; print "\"$ptl[$iii]\"\n"; print "
$pbf[$iii]
\n"; print "
\n"; } else { print "		\n"; print "$ptl[$iii+1]
\n"; print "\"$ptl[$iii+1]\"\n"; print "
$pbf[$iii+1]
\n"; } print "
\n"; print "\$$ppr[$iii]
\n"; print "Item# $pid[$iii]

\n"; print "\"Add \n"; print "\"More
\n"; print "
\n"; } else { print "		\n"; print "\$$ppr[$iii+1]
\n"; print "Item# $pid[$iii+1]

\n"; print "\"Add \n"; print "\"More
\n"; } print "


\n"; $iii = $iii + 2; $number = $number + 2; } print "

\n"; $firstitem = $start+1; $lastitem = $start+10; if ($lastitem > $noofitems) { $lastitem = $noofitems; } print "Items $firstitem - $lastitem of $noofitems Items Found
\n"; if ($noofitems > 10){ if ($start >= 10){ $prevpage = $start - 10; if ($prevpage == 0) { print "\<- Previous \n"; } if ($prevpage != 0) { print "\<- Previous \n"; } } $iii = 0; while($iii <= $noofpages-1) { $thispage = $iii*10; $printpage = $iii + 1; if ($thispage != $start && $thispage == 0) { print "- $printpage \n"; } if ($thispage != $start && $thispage != 0) { print "- $printpage \n"; } if ($thispage == $start && $thispage != 0) { print "- $printpage \n"; } if ($thispage == $start && $thispage == 0) { print "$printpage \n"; } $iii = $iii + 1; } if ($start+10 < $noofpages*10){ $nextpage = $start + 10; print "- Next -\> \n"; } } print "



\n"; print <

EndOfHTML open (BOTTOMNAV,"../bottomnav.dat") || print "Could not open file \n"; while () { print $_; } close(BOTTOMNAV); print < © 2000-2006 The Princess Store - All Rights Reserved



EndOfHTML sub error_file { print < Please Wait...




L O A D I N G

If this page does not refresh automaticly, click here.
END_of_html exit; }