Beefy Boxes and Bandwidth Generously Provided by pair Networks
We don't bite newbies here... much
 
PerlMonks  

Re: Generate thumbnail and small overstruck images for web publication

by Intrepid (Deacon)
on Sep 26, 2005 at 10:38 UTC ( #495054=note: print w/replies, xml ) Need Help??

Help for this page

Select Code to Download


  1. or download this
      my ($x_ppem, $y_ppem, $ascender, $descender, $width, $height, $max_a
    +dvance) =
      $overL->QueryFontMetrics
    ...
        text => "$overText",
        '@C:/WINDOWS/Fonts/times.ttf', # Omit for default font
        );
    
  2. or download this
      my $mswinpath;
      my $fontpath = ($mswinpath = $ENV{SYSTEMDIR} || $ENV{WINDIR})
    ...
        $fontpath
        );
    

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://495054]
help
Chatterbox?
[shmem]: wait, what? you want that person to read the documentation for you?
[Lady_Aleena]: I might have to go with options instead of a straight list.
[Discipulus]: if more than 3 go for named variables LA
[Lady_Aleena]: Discipulus, it is at 2 now, but with what I am thinking about, it could go to 3. However, only 1 is needed. The second and third are optional.
[shmem]: straight list or named parameters - that depends on whether (and how many) optional arguments you have
[Discipulus]: if so a plain list is ok, imho
[Lady_Aleena]: shmem, I already have the plugin installed, just not active.
[shmem]: if you have 1 optional argument, place that at the end of the list. If you have more, go for named parameters.
[Lady_Aleena]: 1 manditory, 2 optional.
[Discipulus]: my ($need,$opta,$optb ) = @_; .. if $opta..

How do I use this? | Other CB clients
Other Users?
Others meditating upon the Monastery: (12)
As of 2017-04-27 12:19 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?
    I'm a fool:











    Results (506 votes). Check out past polls.