charset

michael.havlicek michael.havlicek na invalid.fr
Pátek Červenec 11 21:14:27 MEST 2003


Petr Vileta <petr na practisoft.cz> wrote:

> >     use strict;
> >     use CGI   qw( :standard );
> >     my $cgi    = new CGI;
> >     print $cgi->header( -charset => 'ISO-8859-2');
> >     print $cgi->start_html( -title => 'Toto je title' );
> No ja jsem asi nejaky konzervativni nebo hloupy, ale protoze mi pouzivani
> techto postupu nekolikrat vratilo naprosto nepouzitelny vysledek, tak jsem
> je prestal pouzivat a tvorim si header sam asi takto:
> 
> print "Content-Type: text/html\; charset=ISO-8859-2\n\n";
> print "<!DOCTYPE html PUBLIC \"-//W3C//DTD HTML Final 4.0//EN\">\n";
> print "<html><head>\n";
> print <title>'Toto je title</title>\n";
> print </head>\n";
> print "<META HTTP-EQUIV=\"Content-type\" CONTENT=\"text/html\;
> CHARSET=ISO-8859-2\">\n";
> print "<body>ì'èø¾ýáíé»ùúé</body></HTML>
> 
> Takhle si do stranky muzu nacpat cokoliv se mi zlibi a nejsem zavisly na
> nejake knihovne nebo modulu. Jedine, na co chci upozornit je, ze na konci te
> prvni radky musi byt "\n\n" tedy 2x. No a samozrejme vsechny uvozovky,
> stredniky a podobne potvory escapovat.
> 
> --
> Petr

Vyborne Petre tuto fintu jsem dlouho hledal a nemohl jsem na to prijit
protoze jsem systematicky zapominal escapovat toto: ";" (konec 6 linky
tvojeho header) a pro to mi to vubec nefungovalo.
Mockrat diky a at zije cestina!
--
Michal


Další informace o konferenci Perl