add new comparison method rgb_difference that resembles arithmetical difference per...
[imager.git] / bench / copy.bench
CommitLineData
64100ee2
TC
1#!perl -w
2use Imager qw(:all);
3use Benchmark;
4
5# a basic benchmark to test how much faster it is to work line by line
6$im1 = Imager::ImgRaw::new(200,200,3);
7$im2 = Imager::ImgRaw::new(200,200,3);
8
9timethese(-5,
10 { copy => 'Imager::i_copy($im2, $im1)' });