The stupid question is the question not asked PerlMonks

### Polygon Filling algorithm in Perl

by rbc (Curate)
 on Sep 27, 2002 at 21:52 UTC Need Help??

Replies are listed 'Best First'.
Re: Polygon Filling algorithm in Perl
by hossman (Prior) on Sep 28, 2002 at 08:55 UTC

totally random thought...

I notice you defined all of your y coords based on the height .. but you used subtraction, so you're still making an assumption about the minimum height. Any time you can define some constraint on a value given another value, you should consider doing so in your code. That way if someone says "Hey this is cool, but it's a little big so i'll change the size to 50x60" your code can deal with the change flawlessly...

```my \$A = new Vector2D( int(\$width * 0.3125),  int(\$height * 0.65) );
my \$B = new Vector2D( int(\$width * 0.46875), int(\$height * 0.75) );
my \$C = new Vector2D( int(\$width * 0.65625), int(\$height * 0.55) );
my \$D = new Vector2D( int(\$width * 0.65625), int(\$height * 0.25) );
my \$E = new Vector2D( int(\$width * 0.46875), int(\$height * 0.45) );
my \$F = new Vector2D( int(\$width * 0.3125),  int(\$height * 0.35) );

Create A New User
Node Status?
node history
Node Type: perlcraft [id://201359]
Approved by ignatz
help
Chatterbox?
and all is quiet...

How do I use this? | Other CB clients
Other Users?
Others exploiting the Monastery: (6)
As of 2018-06-18 16:12 GMT
Sections?
Information?
Find Nodes?
Leftovers?
Voting Booth?
Should cpanminus be part of the standard Perl release?

Results (110 votes). Check out past polls.

Notices?