my $q = $self->query;
$q->start_html(
-style=>
{
-type => 'text/css',
-src=>'/styles/print.css',
-rel => 'stylesheet',
-media => 'all'
}
);
I tried it in cgiapp_prerun & cgiapp_postrun. No errors tho.
sub cgiapp_postrun {
my ($self, $output_ref) = @_;
my $q = $self->query;
$$output_ref = $q->start_html(
-style=>
{
-type => 'text/css',
-src=>'/styles/print.css',
-rel => 'stylesheet',
-media => 'all'
}
)
. $$output_ref;
}
Untitled Document Maintain Users
perlmonks.org content © perlmonks.org and arcnon, rhesa
prlmnks.org © 2006 edmund von der burg (eccles & toad)
v 0.03