求解！，提取文本文件中的每一行，并按格式每行生成一个新的文本文件。
文档A.txt的内容如下：
qvod://302333550|6A814D2D1196EBE94FB0E2D32E5534348BEA4D97|本山快乐营0105.rmvb|
qvod://277306503|11C65F29843CC615AE01A5395C7CE478AB1D8F38|本山快乐营0106.rmvb|
qvod://285684701|D692A2EA982494B61B478074FC74B9178FF3A9A3|本山快乐营0107.rmvb|
qvod://506836673|703C6B8829830FACFD50D74EDFAF8631E59CDEAF|本山快乐营0108.rmvb|
qvod://291667317|9C4D4CF002843BB7FAAD83B62756AFC646CC43B5|本山快乐营0112.rmvb|
qvod://492971900|450C11E2F9A2FC9882EDD8819AD555C66E484D04|本山快乐营0113.rmvb|
qvod://506949958|351372E34E399BC802DE65F0070C410809DADECE|本山快乐营0115.rmvb|
qvod://288885948|6AE49F46BE0D8CE410439C4822809BBB8B855C42|本山快乐营0118.rmvb|
qvod://296632167|B2147F0265DCD58F699AF80B3AA1CE06EF55880A|本山快乐营0119.rmvb|
qvod://506235061|604CEBC162B7B364389C8E7478DAE128AA9B5528|本山快乐营0122.rmvb|
qvod://285655554|2818FED726C099F517E97A048D40FC7CF2088762|本山快乐营0126.rmvb|
qvod://284890455|0D05A12DFAAF1D634F269C1DE5D3791F3C073C36|本山快乐营0127.rmvb|
要求每行生成一个新的文本文件格式如下（例如第一行生成后文件）：文件名叫：本山快乐营0105.htm。文件内容：
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3c.org/TR/1999/REC-html401-
19991224/loose.dtd">
<HTML xmlns="http://www.w3.org/1999/xhtml"><HEAD><TITLE>本山快乐营0105</TITLE>
<META http-equiv=Content-Type content="text/html; charset=gb2312">
<STYLE type=text/css>BODY {
MARGIN: 0px
}
</STYLE>
<META content="MSHTML 6.00.3790.3959" name=GENERATOR></HEAD>
<BODY>
<OBJECT id=QvodPlayer height="100%"
onerror="if(window.confirm('请您先安装QvodPlayer软件,然后刷新本页才可以正常播放.')){window.open
('http://www.qvod.com/download.htm')}else{self.location='http://www.qvod.com/'}"
width="100%" classid=clsid:F3D0D36F-23F8-4682-A195-74C92B03D4AF name=QvodPlayer><PARAM NAME="URL"
VALUE="qvod://302333550|6A814D2D1196EBE94FB0E2D32E5534348BEA4D97|本山快乐营0105.rmvb|"><PARAM NAME="Autoplay"
VALUE="1"></OBJECT>
</BODY></HTML>
文档A.txt的内容如下：
qvod://302333550|6A814D2D1196EBE94FB0E2D32E5534348BEA4D97|本山快乐营0105.rmvb|
qvod://277306503|11C65F29843CC615AE01A5395C7CE478AB1D8F38|本山快乐营0106.rmvb|
qvod://285684701|D692A2EA982494B61B478074FC74B9178FF3A9A3|本山快乐营0107.rmvb|
qvod://506836673|703C6B8829830FACFD50D74EDFAF8631E59CDEAF|本山快乐营0108.rmvb|
qvod://291667317|9C4D4CF002843BB7FAAD83B62756AFC646CC43B5|本山快乐营0112.rmvb|
qvod://492971900|450C11E2F9A2FC9882EDD8819AD555C66E484D04|本山快乐营0113.rmvb|
qvod://506949958|351372E34E399BC802DE65F0070C410809DADECE|本山快乐营0115.rmvb|
qvod://288885948|6AE49F46BE0D8CE410439C4822809BBB8B855C42|本山快乐营0118.rmvb|
qvod://296632167|B2147F0265DCD58F699AF80B3AA1CE06EF55880A|本山快乐营0119.rmvb|
qvod://506235061|604CEBC162B7B364389C8E7478DAE128AA9B5528|本山快乐营0122.rmvb|
qvod://285655554|2818FED726C099F517E97A048D40FC7CF2088762|本山快乐营0126.rmvb|
qvod://284890455|0D05A12DFAAF1D634F269C1DE5D3791F3C073C36|本山快乐营0127.rmvb|
要求每行生成一个新的文本文件格式如下（例如第一行生成后文件）：文件名叫：本山快乐营0105.htm。文件内容：
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3c.org/TR/1999/REC-html401-
19991224/loose.dtd">
<HTML xmlns="http://www.w3.org/1999/xhtml"><HEAD><TITLE>本山快乐营0105</TITLE>
<META http-equiv=Content-Type content="text/html; charset=gb2312">
<STYLE type=text/css>BODY {
MARGIN: 0px
}
</STYLE>
<META content="MSHTML 6.00.3790.3959" name=GENERATOR></HEAD>
<BODY>
<OBJECT id=QvodPlayer height="100%"
onerror="if(window.confirm('请您先安装QvodPlayer软件,然后刷新本页才可以正常播放.')){window.open
('http://www.qvod.com/download.htm')}else{self.location='http://www.qvod.com/'}"
width="100%" classid=clsid:F3D0D36F-23F8-4682-A195-74C92B03D4AF name=QvodPlayer><PARAM NAME="URL"
VALUE="qvod://302333550|6A814D2D1196EBE94FB0E2D32E5534348BEA4D97|本山快乐营0105.rmvb|"><PARAM NAME="Autoplay"
VALUE="1"></OBJECT>
</BODY></HTML>
