» wie wär es mit einem Stück Quelltext?
Du hast recht (zumal ich mal in SELFHTML die index.hmtl lokal so geändert habe, dass sie auf eine wav-Datei verlinkt, und dort ging es! ...).
Es werden zwei Dateien erzeugt, einen Rahmen und eine eingebettete Datei. Die relevanten Code-Teile sollten sein:
Rahmendatei:
use CGI qw(:standard);
...
print header(
-type=>'text/html',
-charset=>'UTF-8',
),
start_html(
-dtd=>'-//W3C//DTD HTML 4.01 Transitional//EN"
"http://www.w3.org/TR/html4/loose.dtd',
-title=>'Lexikon',
-script=>{
-language=>'JavaScript',
-code=>'function sf(){ ... }'
},
-onLoad=>'sf()',
-style=>{'src'=>'c:/myDIC/PRO_FILES/style.css'},
-BGCOLOR=>'#D9DEAD',
),
...
'<iframe src="../../result.htm" name="result" width="920" height="980">',
)
...
end_form,
end_html;
Eingebettete Datei:
open RES, ">c:/Programme/indigoperl/htdocs/result.htm";
print RES '<?xml version="1.0" encoding="utf-8"?>'."\n";
print RES '<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN"'."\n";
print RES '"http://www.w3.org/TR/html4/loose.dtd">'."\n";
print RES '<html><head><title>Ergebnis</title>';
print RES '<meta content="text/html; charset=UTF-8" http-equiv=Content-Type>';
print RES '</head><body>'."\n";
...
<a href="c:/Programme/XXX/wav2/J26776.wav">audio</a>
...
print RES '</body></html>';