So, what is in line 28? Have you looked at it and checked it that it means what you intend?

my $base_img->rubthrough( src => $hmap->$img );  # Overlay on other im
+ages(see Imager::Transformations)
[download]

Please explain for every item in English what it is supposed to mean. Especially, explain the construct $hmap->$img.