view release on metacpan or  search on metacpan

contrib/hp_disk_info.cgi  view on Meta::CPAN

print POSTOUT "/maxlength 0 def         ","\n";
print POSTOUT "/negmaxlength 0 def         ","\n";
print POSTOUT "tablewidth totalrowwidthcalc         ","\n";
print POSTOUT "0 tablewidth htablepad add pretranslate         ","\n";
print POSTOUT "cellh -3 mul 0 pretranslate         ","\n";
print POSTOUT "check_xwrap","\n";
#end of spacer
print POSTOUT "             } if","\n";
print POSTOUT "                } def","\n";
print POSTOUT "%","\n";
print POSTOUT "%------------defines--formula-based","\n";
print POSTOUT "%","\n";
print POSTOUT "","\n";
print POSTOUT "% Define the Font","\n";
print POSTOUT "/HelveticaBold findfont fonth scalefont setfont","\n";
print POSTOUT "%width of cell (will vary depening on maximum string width","\n";
print POSTOUT "/cellw maxlength def %not used yet","\n";
print POSTOUT "%cell height total","\n";
print POSTOUT "/cellh fontpad 2 mul fonth add def","\n";
print POSTOUT "/negcellh cellh -1 mul def","\n";
print POSTOUT "%starting point (bottom left corner point xy pos) of string in cell","\n";