catalyst and view::tt shell