perlで画像のトリミングはどのようにすればよいのでしょうか？

具具って見たところ柿のページがHITしました
ttp://www.i-tech-jp.com/webapp1_cgi.html
有料みたいでソースを見れません。

どなかたサンプルソースをお願いします。