--- title: "Subrutiner i templats" type: "forum-thread" url: "https://www.webforum.nu/amne/perl-ruby/19364-subrutiner-i-templats" topic: "Perl & Ruby" topic_url: "https://www.webforum.nu/amne/perl-ruby" author: "nordan" published: "2001-05-19T13:51:00.000Z" updated: "2001-05-23T11:02:00.000Z" replies: 1 views: 197 page: 1 pages: 1 language: "sv-SE" site: "webForum — webforum.nu" rights: "Upphovsrätten till varje inlägg tillhör dess författare." attribution: "Citera som: webForum, https://www.webforum.nu/amne/perl-ruby/19364-subrutiner-i-templats" --- # Subrutiner i templats ## #1 — nordan, 2001-05-19T13:51Z Hej! Jag skulle vilja använda subrutiner i templats men har inte fått det att funka \*som vanligt då\* Mitt CGI script som jag har ser ut så här ``` #!usr/bin/perl use strict; use HTML::Template; use CGI; use constant TMPL_FILE => "test.tmpl"; sub prova{ print "Provar om subrutiner går att skriva ut"; } my $tmpl = new HTML::Template( filename => TMPL_FILE ); my $time = localtime; $tmpl->param(time => $time); print "Content-type: text/html\n\n", $tmpl->output; my $q = new CGI; my $tmpl = new HTML::Template( filename => TMPL_FILE, associate => $q); ``` Det jag vill är att jag vill kunna skriva ut en subrutin till en templat fil tex sub prova Någon som kan tala om det? Det kanske inte går eller går det? Permalänk: https://www.webforum.nu/p/19364 ## #2 — Hansen, 2001-05-23T11:02Z Hej! Du ska nog inte printa ut något utan snarare retunera ett värde/sträng. Kika på följande kod: ``` #!/usr/bin/perl -w use strict; use CGI qw(:standard); use HTML::Template; my $q = new CGI; my $template = HTML::Template->new( filename => 'mall.tmpl', associate => $q, global_vars => 1, die_on_bad_params => 0, loop_context_vars => 1, ); $template->param( RANDOM => random(), ); print "Content-Type: text/html\n\n"; print $template->output; sub random { return int( rand(50) ); } ``` Mallen: ```

Ditt tal:

``` Permalänk: https://www.webforum.nu/p/341888 --- Tråden på webben: https://www.webforum.nu/amne/perl-ruby/19364-subrutiner-i-templats