XML::Simple XMLin()

sporkit

I'm writing a dcr conversion script to port old dcrs over to their new format for a site redesign. I've tested this code on another server, but our TS install keeps throwing this strange error.

#!/data01/interwoven/TeamSite/iw-perl/bin/iwperl

use strict;
use warnings;

use XML:imple;
use Data:umper;

my $cust_xml = XMLin('./data/about/faq');

#print Dumper($cust_xml);

I've tried the above with the full path as well. It gives the following error.

bash-2.05$ ./test.pl
404 File `/path/to/branch/WORKAREA/conversion/templatedata/ASDF/content_page/dcr4.5.dtd' does not exist file:/path/to/branch/WORKAREA/conversion/templatedata/ASDF/content_page/dcr4.5.dtd
Handler couldn't resolve external entity at line 2, column 36, byte 75
error in processing external entity reference at line 2, column 36, byte 75 at /data01/interwoven/TeamSite/iw-perl/vendor/lib/XML/Parser.pm line 187

I've changed a few path names for security purposes. Why is it looking for dcr4.5.dtd? Is it possible somebody has fooled around with the installed module code?

bash-2.05$ iwodcmd -v
Version 6.0.2.1.0 Build 52162 Interwoven 20050921

sporkit

Looks like I've found the first half of my problem.

bash-2.05$ head data/about/faq
<?xml version="1.0" encoding="UTF-8"?>

<!DOCTYPE record SYSTEM "dcr4.5.dtd">
<record name="faq" type="content">
    <item name="PageTitle">
        <value>FAQ\'s</value>

    </item>
    <item name="Summary">
        <value/>
    </item>
    <item name="Content">

For some reason it's taking the doctype line and looking for the file in quotes. Why is this? Is there something I can do about it?