Help for this page

Select Code to Download


  1. or download this
    use warnings;
use strict;
...
        print $picwidth, $picheight, sprintf('%8.3f',$ratio), $backcol
+or, $color1, $color1, ($backcolor eq $color1 ? 'EQ' : 'ERR'), ($color
+2 eq $color1 ? 'EQ' : 'ERR');
    }
}
  2. or download this
    10      10         1.000        #ffffff #ffffff #ffffff EQ      EQ
11      10         1.100        #ffffff #ffffff #ffffff EQ      EQ
...
19      1000       0.019        #ffffff #ffffff #ffffff EQ      EQ
20      1000       0.020        #ffffff #ffffff #ffffff EQ      EQ
1501    1000       1.501        #f5f5f5 #f5f5f5 #f5f5f5 EQ      EQ