LDP
/
LDP
mirror of https://github.com/tLDP/LDP
0
1
Fork 0
Code Releases Activity

*** empty log message ***

This commit is contained in:
david 2002-01-22 21:20:21 +00:00
parent ae586c28a8
commit ccfc40f4eb
1 changed files with 3 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
LDP/txt2db/txt2db.pl
View File

@ -265,7 +265,7 @@ sub proc_txt {
$line =~ s/^A://;
&trimline;
&closeanswer;
$line = "<answer><para>" . $line . "\n";
$line = "<answer><para>" . $line;
$answer = 1;
$para = 1;
@ -311,9 +311,9 @@ sub proc_txt {
} elsif ($link =~ /ldp:/) {
$link =~ s/^ldp://;
$linkname =~ s/^ldp://;
$tempfile = "/tmp/txt2db-" . $rand;
system("wget -q http://db.linuxdoc.org/cgi-pub/name-to-url.pl?name=$link -O $tempfile");
$cmd = "wget -q http://db.linuxdoc.org/cgi-pub/name-to-url.pl?name=$link -O $tempfile";
system("$cmd");
open(URL, "$tempfile") || die "txt2db: cannot open temporary file ($!)\n";
$link = <URL>;
close(URL);