Hallo
Ich möchte dieses CGI Script in einem HTML Formular ausgeben lassen.
CGI Script:
use Text::CSV_XS;
use CGI;
my $cgi = CGI->new;
my $csv = Text::CSV_XS->new();
open my $fh, "<", "Auswertung.csv" or die $!;
print $cgi->start_table;
while (my $line = <$fh>) {
my $status = $csv->parse($line);
my @columns = $csv->fields();
print $cgi->Tr( map {
$cgi->td($_)
} @columns;
}
print $cgi->end_table;
HTML Code:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
<html>
<head>
<meta http-equiv="Content-Language" content="de">
<meta name="GENERATOR" content="Microsoft FrontPage 5.0">
<meta name="ProgId" content="FrontPage.Editor.Document">
<meta http-equiv="Content-Type" content="text/html; charset=windows-1252">
<title>DHL</title>
</head>
<body>
<table border="1" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" width="100%" id="AutoNumber1">
<tr>
<td width="33%">
<p align="center">DHL</td>
<td width="33%">
<p align="center">K&N</td>
<td width="34%">
<p align="center">Hellmann</td>
</tr>
<tr>
<td width="33%"> </td>
<td width="33%"> </td>
<td width="34%"> </td>
</tr>
<tr>
<td width="33%"> </td>
<td width="33%"> </td>
<td width="34%"> </td>
</tr>
<tr>
<td width="33%"> </td>
<td width="33%"> </td>
<td width="34%"> </td>
</tr>
<tr>
<td width="33%"> </td>
<td width="33%"> </td>
<td width="34%"> </td>
</tr>
</table>
</body>
</html>
Jetzt möchte ich die CGI in der HTML ausgeben lassen.
Dann benötige ich einen Link der ein Tortendiagramm öffnet und die daten der CSV anzeigt.
Vielleicht kann mir irgendjemand helfen
Für mich ist das zu kompliziert
mfg und Danke im Voraus
lolipop 999
edit pq: code-tags hinzugefügt\n\n
<!--EDIT|pq|1159370430-->