G'day Bod,
In the documentation for
stringFT()
you'll see:
...stringFT($fgcolor, ...)
and a little after that:
fgcolor Color index to draw the string in
In "GD: Color Control", you'll see how the create such an index.
I tried using a string with a colour name in multiple methods requiring a colour index
(stringFT(), rectangle(), fill(), and others) and all gave the warning:
Argument "<colour name>" isn't numeric in subroutine entry at ...
If I don't use the warnings pragma, I don't see those warnings.
Are you using warnings?
If so, have you checked in your web server's error log?
[Complete guess:
an invalid colour index defaults to black.]
So, instead of the string 'silver', you want the return value of colorAllocate(192,192,192).
If you're unfamiliar with that RGB format, take a look at "RGB Colour Code".
You'll want to make similar changes for other named colours.
A few of other points regarding your code:
-
You have used Indirect Object Syntax
in the code you posted.
Please follow that link, read the emboldened discouragement at the start of that section;
then read on for the reasons to avoid it.
-
There are variables used that are (presumably) defined elsewhere (I noted %file and %data).
This means that other code might also be using, and possibly modifying, them: there may be side-effects.
Aim to pass needed data to subroutines as arguments and keep a tight rein on what's used and where.
-
As far as I can tell, $file{'joolzimage', 'file'} is a
"Multi-dimensional array emulation".
This is ancient code, used in Perl4, before references became available in Perl5.
Aim to use "real" multidimensional arrays; e.g. $file{joolzimage}{file}.
Posts are HTML formatted. Put <p> </p> tags around your paragraphs. Put <code> </code> tags around your code and data!
Titles consisting of a single word are discouraged, and in most cases are disallowed outright.
Read Where should I post X? if you're not absolutely sure you're posting in the right place.
Please read these before you post! —
Posts may use any of the Perl Monks Approved HTML tags:
- a, abbr, b, big, blockquote, br, caption, center, col, colgroup, dd, del, details, div, dl, dt, em, font, h1, h2, h3, h4, h5, h6, hr, i, ins, li, ol, p, pre, readmore, small, span, spoiler, strike, strong, sub, summary, sup, table, tbody, td, tfoot, th, thead, tr, tt, u, ul, wbr
You may need to use entities for some characters, as follows. (Exception: Within code tags, you can put the characters literally.)
| |
For: |
|
Use: |
| & | | & |
| < | | < |
| > | | > |
| [ | | [ |
| ] | | ] |
Link using PerlMonks shortcuts! What shortcuts can I use for linking?
See Writeup Formatting Tips and other pages linked from there for more info.