#!/usr/bin/perl
open(IN,	'lynx_bookmark.html');
while(<IN>)	{
	if	(!/^\<LI\>\<a href=\"file\:/)	{
		s/^\<LI\>\<a href=\"(.+)\">(.+)\<\/a\>/\<DT\>\<A HREF=\"$1\"\>L \<\/A\>\. $2/;
	}
	print;
}
