perl-install/share/advertising/corpo-desk-10.pl


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19

#!/usr/bin/perl

$width = 556;
$height = 303;

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

@text = ([ N("<b>Find out quickly Mandrakestore!!!</b>"), center => 1 ],
         ' ',
	 N("Mandrakestore is Mandrakesoft full service e-commerce platform."),
	 N("Thanks to Mandrakestore, meet all your needs:"),
	 ' ',
         N("- Find out about all Mandrakelinux products"),
	 N("- Buy additional support incidents"),
	 N("- Find out our ISV partners"),
	 N("- etc..."),
	 ' ',
         [ N("Stop by today at <b>www.mandrakestore.com</b>!"), center => 1 ]);