More Web Stuff June 05, 2014 04:07PM |
Registered: 10 years ago Posts: 25 |
Re: More Web Stuff June 06, 2014 07:57AM |
Admin Registered: 14 years ago Posts: 4,680 |
Re: More Web Stuff June 06, 2014 05:11PM |
Registered: 10 years ago Posts: 25 |
Re: More Web Stuff June 06, 2014 07:30PM |
Admin Registered: 14 years ago Posts: 4,680 |
Re: More Web Stuff June 06, 2014 09:44PM |
Registered: 10 years ago Posts: 25 |
Re: More Web Stuff June 06, 2014 09:57PM |
Admin Registered: 14 years ago Posts: 4,680 |
Re: More Web Stuff June 18, 2014 02:32AM |
Re: More Web Stuff June 18, 2014 03:21AM |
Registered: 10 years ago Posts: 25 |
Re: More Web Stuff June 18, 2014 05:34PM |
Re: More Web Stuff June 18, 2014 10:02PM |
Registered: 10 years ago Posts: 25 |
Re: More Web Stuff June 19, 2014 04:41AM |
Re: More Web Stuff June 19, 2014 01:12PM |
Registered: 11 years ago Posts: 16 |
Re: More Web Stuff June 19, 2014 03:26PM |
Admin Registered: 14 years ago Posts: 236 |
Re: More Web Stuff June 19, 2014 06:31PM |
Registered: 10 years ago Posts: 25 |
Re: More Web Stuff June 23, 2014 01:33AM |
Moderator Registered: 10 years ago Posts: 9 |
Re: More Web Stuff July 06, 2014 02:33PM |
Registered: 10 years ago Posts: 3 |
Re: More Web Stuff July 16, 2014 08:42PM |
Registered: 10 years ago Posts: 6 |
Re: More Web Stuff July 18, 2014 09:00AM |
Registered: 10 years ago Posts: 6 |
#!/usr/bin/perl use HTML::Template; use CGI; $cgi = new CGI; # Open lang.conf my $file = "lang.conf"; open (CONF, $file); my $lang; while (<CONF> ) { $lang =$_; } close CONF; # Open style.conf my $file = "style.conf"; open (CONF, $file); my $style; while (<CONF> ) { $style =$_; } close CONF; # Open HTML template my $template = HTML::Template->new(filename => '/$lang/test.tmpl'); # give style parameter $template->param(STYLE => $style/style.css); # Sending Content-Type (needed) and display template print "Content-Type: text/html\n\n", $template->output;
Re: More Web Stuff August 05, 2014 06:56PM |
Registered: 12 years ago Posts: 11 |