diff options
author | Karl Berry <karl@freefriends.org> | 2019-10-10 21:58:46 +0000 |
---|---|---|
committer | Karl Berry <karl@freefriends.org> | 2019-10-10 21:58:46 +0000 |
commit | dd0d081462a3fa63368e0f0ec875e097c883c361 (patch) | |
tree | fdf37dda7428d68a58db673422734a708eae3643 /Master/texmf-dist/doc/latex/shipunov/scripts/biokey2html2.pl | |
parent | 2d0e78c3e9d6118b73f0a80f3b8d84b99cc3dd60 (diff) |
shipunov with -shipunov postfix for new .sty (8oct19)
git-svn-id: svn://tug.org/texlive/trunk@52334 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/texmf-dist/doc/latex/shipunov/scripts/biokey2html2.pl')
-rwxr-xr-x | Master/texmf-dist/doc/latex/shipunov/scripts/biokey2html2.pl | 31 |
1 files changed, 31 insertions, 0 deletions
diff --git a/Master/texmf-dist/doc/latex/shipunov/scripts/biokey2html2.pl b/Master/texmf-dist/doc/latex/shipunov/scripts/biokey2html2.pl new file mode 100755 index 00000000000..75801f4430a --- /dev/null +++ b/Master/texmf-dist/doc/latex/shipunov/scripts/biokey2html2.pl @@ -0,0 +1,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 +} + +#
\ No newline at end of file |