perl-install/share/advertising/dwd-01.pl


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15

#!/usr/bin/perl

$width = 556;
$height = 303;

$y_start = 10;
$border = 10;  #- for leftish text

@text = ([ N("<b></b>"), center => 1 ],
         ' ',
		 N(""),
		 ' ',
         N(""),
         ' ',
         N(""));