####
accent circlesr.jpg|accent circletn.jpg|Accent|
AccentCircle BraggCreekPav_ABsr.jpg|AccentCircle BraggCreekPav_ABtn.jpg|Accent|
arabia01sr.jpg|arabia01tn.jpg|Com|
arabia02sr.jpg|arabia02tn.jpg|Com|
arabia03sr.jpg|arabia03tn.jpg|Com|
australia 02sr.jpg|australia 02tn.jpg|Res|
australia 03sr.jpg|australia 03tn.jpg|Com|
australia 04sr.jpg|australia 04tn.jpg|Accent Res|
australia01sr.jpg|australia01tn.jpg|Mun|
Belmont Abbeysr.jpg|Belmont Abbeytn.jpg|Custom|
Big Crosswalk 2sr.jpg|Big Crosswalk 2tn.jpg|Mun|
big crosswalksr.jpg|big crosswalktn.jpg|Mun|
BOYERJNTsr.jpg|BOYERJNTtn.jpg|Mun|
BRICKsr.jpg|BRICKtn.jpg|Accent|
Brown house offset bricksr.jpg|Brown house offset bricktn.jpg|Res|
brunei 01sr.jpg|brunei 01tn.jpg|Com|
BUSsr.jpg|BUStn.jpg|Mun|
CALIFHRsr.jpg|CALIFHRtn.jpg|Com|
chicagosr.jpg|chicagotn.jpg|Accent|
chicago2sr.jpg|chicago2tn.jpg|Accent Res|
chicago3sr.jpg|chicago3tn.jpg|Accent|
chicago4sr.jpg|chicago4tn.jpg|Accent|
CIRCLE BRICKS SMALLsr.jpg|CIRCLE BRICKS SMALLtn.jpg|Accent|
CircleAccent BowRiver ABsr.jpg|CircleAccent BowRiver ABtn.jpg|Accent Res|
CircleAccent2 BowRiver ABsr.jpg|CircleAccent2 BowRiver ABtn.jpg|Accent |
Cobble Drivesr.jpg|Cobble Drivetn.jpg|Res|
Complex Largesr.jpg|Complex Largetn.jpg|Accent Res|
ConcSidewalkInstall1sr.jpg|ConcSidewalkInstall1tn.jpg|Install|
ConcSidewalkInstall2sr.jpg|ConcSidewalkInstall2tn.jpg|Install|
ConcSidewalkInstall3sr.jpg|ConcSidewalkInstall3tn.jpg|Install|
CopperCreeksr.jpg|CopperCreektn.jpg|Com|
Custom Pathsr.jpg|Custom Pathtn.jpg|Custom Res|
Daytonasr.jpg|Daytonatn.jpg|Com|
Daytona2sr.jpg|Daytona2tn.jpg|Custom Com|
diagonal herringbone circlesr.jpg|diagonal herringbone circletn.jpg|Accent|
Drivewaysr.jpg|Drivewaytn.jpg|Res|
DriveWay2sr.jpg|DriveWay2tn.jpg|Res|
DW AshSlate PavePrint_MBsr.jpg|DW AshSlate PavePrint_MBtn.jpg|Custom Res|
DW AshSlate PavePrint_MB2sr.jpg|DW AshSlate PavePrint_MB2tn.jpg|Custom Res|
DW bullseye DJorgenson SKsr.jpg|DW bullseye DJorgenson SKtn.jpg|Accent Res|
england02sr.jpg|england02tn.jpg|Mun|
EuroHB_Detailsr.jpg|EuroHB_Detailtn.jpg|Res|
full offset - frog photosr.jpg|full offset - frog phototn.jpg|Res|
Gardenssr.jpg|Gardenstn.jpg|Com|
Intersection Englandsr.jpg|Intersection Englandtn.jpg|Mun|
Italysr.jpg|Italytn.jpg|Mun|
Italy01sr.jpg|Italy01tn.jpg|Mun|
JAPANsr.jpg|JAPANtn.jpg|Mun|
Krissr.jpg|Kristn.jpg|Install|
LaneCulverCityCAsr.jpg|LaneCulverCityCAtn.jpg|Accent|
LevelIntersection_Fallbrook2sr.jpg|LevelIntersection_Fallbrook2tn.jpg|Accent Mun|
LevelMedianHiRessr.jpg|LevelMedianHiRestn.jpg|Mun|
mansionsr.jpg|mansiontn.jpg|Res|
MARINE DRIVEsr.jpg|MARINE DRIVEtn.jpg|Mun|
new zealand 01sr.jpg|new zealand 01tn.jpg|Res|
new zealand 02sr.jpg|new zealand 02tn.jpg|Res|
new zealand 03sr.jpg|new zealand 03tn.jpg|Res|
new zealand 04sr.jpg|new zealand 04tn.jpg|Mun|
new zealand 05sr.jpg|new zealand 05tn.jpg|Mun|
new zealand 09sr.jpg|new zealand 09tn.jpg|Res|
new zealand 10sr.jpg|new zealand 10tn.jpg|Mun|
new zealand 12sr.jpg|new zealand 12tn.jpg|Res|
new zealand 13sr.jpg|new zealand 13tn.jpg|Mun|
NorthVansr.jpg|NorthVantn.jpg|Res|
PacBeachXwalk1sr.jpg|PacBeachXwalk1tn.jpg|Custom Com|
PacBeachXwalk2sr.jpg|PacBeachXwalk2tn.jpg|Custom Com|
PacBeachXwalk3sr.jpg|PacBeachXwalk3tn.jpg|Custom Com|
PacBeachXwalk3Install1sr.jpg|PacBeachXwalk3Install1tn.jpg|Install|
PacBeachXwalk3Install2sr.jpg|PacBeachXwalk3Install2tn.jpg|Install|
PacBeachXwalk3Install3sr.jpg|PacBeachXwalk3Install3tn.jpg|Install|
Pattern Smoothnesssr.jpg|Pattern Smoothnesstn.jpg|Install|
PedPromenade Italysr.jpg|PedPromenade Italytn.jpg|Mun|
PicoXwalk1sr.jpg|PicoXwalk1tn.jpg|Mun|
PicoXwalk2sr.jpg|PicoXwalk2tn.jpg|Mun|
Plaza_Italysr.jpg|Plaza_Italytn.jpg|Mun|
portlandstreet-aftersr.jpg|portlandstreet-aftertn.jpg|Mun|
portlandstreetinstallsr.jpg|portlandstreetinstalltn.jpg|Install|
PtPark_DHb_AshSltsr.jpg|PtPark_DHb_AshSlttn.jpg|Mun|
RAPHAELsr.jpg|RAPHAELtn.jpg|Res|
ReheatPrintVanTranStop_6_2001sr.jpg|ReheatPrintVanTranStop_6_2001tn.jpg|Install|
RiverWalk_Pentictonsr.jpg|RiverWalk_Pentictontn.jpg|Custom Mun|
Roundabout_IdsteinGermanysr.jpg|Roundabout_IdsteinGermanytn.jpg|Accent|
SacramentoXwalksr.jpg|SacramentoXwalktn.jpg|Mun|
SanDiegoXwalksr.jpg|SanDiegoXwalktn.jpg|Mun|
Sidewalk(trobley)sr.jpg|Sidewalk(trobley)tn.jpg|Accent|
SideWalk2sr.jpg|SideWalk2tn.jpg|Accent|
Sidewalks Deutschsr.jpg|Sidewalks Deutschtn.jpg|Mun|
Sidewalk_GAsr.jpg|Sidewalk_GAtn.jpg|Mun|
SpeedTable Charlottesr.jpg|SpeedTable Charlottetn.jpg|Mun|
SpeedTable NewEnglandsr.jpg|SpeedTable NewEnglandtn.jpg|Com|
Spitzsr.jpg|Spitztn.jpg|Com|
Staples 2sr.jpg|Staples 2tn.jpg|Com|
STAPLES CENTERsr.jpg|STAPLES CENTERtn.jpg|Com|
StoreFrontsr.jpg|StoreFronttn.jpg|Com|
StreetChoker Chicago sr.jpg|StreetChoker Chicago tn.jpg|Mun|
StreetChoker2 Chicago sr.jpg|StreetChoker2 Chicago tn.jpg|Mun|
SubDivEnt(trobley)sr.jpg|SubDivEnt(trobley)tn.jpg|Mun|
sydneyzooAsr.jpg|sydneyzooAtn.jpg|Mun|
sydneyzooBsr.jpg|sydneyzooBtn.jpg|Mun|
sydneyzooCsr.jpg|sydneyzooCtn.jpg|Mun|
Townhome SanDiegosr.jpg|Townhome SanDiegotn.jpg|Custom Res|
UtrechtStreetsr.jpg|UtrechtStreettn.jpg|Mun|
WALKERSsr.jpg|WALKERStn.jpg|Mun|
Walkwaysr.jpg|Walkwaytn.jpg|Com|
WarMemorial_Italy1sr.jpg|WarMemorial_Italy1tn.jpg|Accent Mun|
WarMemorial_Italy2sr.jpg|WarMemorial_Italy2tn.jpg|Accent Mun|
Xwalksr.jpg|Xwalktn.jpg|Mun|
XwalkSunsetBlvdsr.jpg|XwalkSunsetBlvdtn.jpg|Mun|
####
#!/usr/bin/perl -w
use strict;
use CGI qw(:standard);
use CGI::Carp qw(fatalsToBrowser);
my $Typeofprint = param('typeofprint');
open (DB, 'DB.db') or die $!;
my $i;
print CGI::header();
print << "_HEAD_";
Street Print CD Catalog
Click to enlarge
Application Type
_HEAD_
print '
';
while (my $line = )
{
chomp $line;
$line =~ tr/\r\n//d;## get rid of end of lines from windoze
my @record = split /\|/, $line, 3;
my $name = $record[0];
$name =~ s/sr.jpg//;
if (defined($record[2]) && $record[2] =~ /\b$Typeofprint\b/i or $Typeofprint eq 'All')
{
print << "_TABLE_";
