head 1.1; branch 1.1.1; access ; symbols ePerl_2_2_14:1.1.1.1 RSE:1.1.1; locks ; strict; comment @# @; 1.1 date 99.05.02.14.43.39; author rse; state Exp; branches 1.1.1.1; next ; 1.1.1.1 date 99.05.02.14.43.39; author rse; state Exp; branches ; next ; desc @@ 1.1 log @Initial revision @ text @
@ 1.1.1.1 log @Import of ePerl 2.2.14 @ text @@demo.table
Low-level HTML programming
Instead of writing down the complex HTML table constructs for the 1x1 chart we program it with the control structures of Perl language.
my $end = 12; # top bar print "
"; # side bar and content print"\n"; for (my $i=1; $i <= $end; $i++) { print " x "; for (my $i=1; $i <= $end; $i++) { print "$i "; } print "\n"; } !> $i "; for (my $j=1; $j<= $end; $j++) { print "", $i*$j, " "; } print"