package ctest1::View::PDF; use strict; use base 'Catalyst::View'; sub process { print "Content-type: text/plain\n\n"; print "This is a test\n"; return 1; } 1;