#!/usr/bin/perl $width = 556; $height = 303; $y_start = 10; $border = 10; #- for leftish text @text = ([ N(""), center => 1 ], ' ', N(""), ' ', N(""), ' ', N(""));