Please find the below code which I written

yeah, an out-of-context code fragment just won't do :)

the problem is probably in the other parts not shown ( config? %flags?  inherit => undef ? )

you might be able to glean some insight from Photo Galleries with Mason and Imager - Perl.com / http://search.cpan.org/dist/faceplant/MANIFEST / http://cpansearch.perl.org/src/RHIZO/faceplant-1.2/src/images/dhandler