summaryrefslogtreecommitdiffstats
path: root/views/a.tt
blob: 781a145036fc38a1aaf67b9099585be5f69fbcda (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
<html>
	<body>
		% (my @tab) = @{$_[0]->{'table'}};
		
		<table border=7>
		<tr><td>id</td><td>isbn</td><td>tytul</td><td>autor</td><td>wlasiciciel</td><td>jest?</td><td>mozna brac?</td></tr>
		<tr>
		
		% for (my $i=0;$i<$#tab;$i++)
		% {
		% 	for (my $ii=0;$ii<7;$ii++) #Jest 7 pol w kazdym rekordzie
		% 	{
		
				<td> <%= $tab[$i][$ii] %> </td>
		% 	}
		%= "\n"
			</tr>
			<tr>
		% }
		
		</table>
		
	</body>
</html>