# ... my $ret=$lwp->get('http://www.example.org/xml_data.xml'); die unless $ret->is_success; my $xml=$ret->encoded_content(); $xml = Encode::encode("ISO-8859-1",$xml); $dbh->do('INSERT INTO whin_auch_immer (xml) VALUES (?)', undef, $xml); # ...