Select Code to Download

#!perl
use 5.010;
...
ok ( md5_hex($square8->jpeg(50)) eq $hash{'ver_bottom'}, 'Correct bott
+om image from vertical');

done_testing;