summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/scripts/shipunov/biokey2html2.pl
blob: 75801f4430a96d07d96326e128fb83d910ce95db (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
#!/usr/bin/perl -w

print STDERR "Making HTML title and paragrafs tags... \n";

while(<>){
	s@^\s+?$@\n<p>@g;
print;
}

BEGIN {
print <<END_OF_BEGIN
<!doctype html public \"-//w3c//dtd html 4.0 transitional//en\">
<html>
<head>
	\t<meta http-equiv=\"Content-Type\" content=\"text/html\">
	\t<link type="text/css" rel="stylesheet" href="ws_key.css">
</head>
<body>

END_OF_BEGIN
}

END{
print <<END_OF_END

</body>
</html>
END_OF_END
}

#