Well heck,
That was a brilliant suggestion, and sure enough, it works real slick.

   for(my $x = 0; $x <= 9; $x++) {
       for(my $y = 0; $y <= 9; $y++) {
           my $ttile = $MW->Photo(-file => "./tiles/brick.xpm");
           $canvas->createImage(32 * $x, 32 * $y, -image => $ttile);
       }
    }
[download]

Good thinking {NULE} and much appreciated.

JP,
-- Alexander Widdlemouse undid his bellybutton and his bum dropped off --