提交 730c79ca authored 作者: Anthony Minessale's avatar Anthony Minessale

FS-7989 add more debugging data

上级 58ba3860
......@@ -34,6 +34,10 @@ if ($prog =~ /wget/) {
}
my $xml = `$cmd $url 2>/dev/null`;
if ($opts{debug}) {
print "URL $url\n";
print $xml;
}
my $xs= new XML::Simple;
my $r = $xs->XMLin($xml);
......
Markdown 格式
0%
您添加了 0 到此讨论。请谨慎行事。
请先完成此评论的编辑!
注册 或者 后发表评论