04/03/20 12:19
>>62>>66
#!/usr/local/bin/perl
use strict;
require 'cgi-lib.pl';
my $cgi = "kensaku.cgi";
my $file = "db.csv";
my %in;
&ReadParse(\%in);
print &PrintHeader();
#print &HtmlTop("");
print <<"_HTML_";
<HTML>
<HEAD>
<STYLE type="text/css">
<!--
.a{
border-width : 1px 1px 1px 1px;
border-style : solid solid solid solid;
border-color : black black black black;
}
-->
</STYLE>
</HEAD>