in reply to How to insert a file into a CLOB object?

What do the data look like? If they are encoded like I think they are, simply: 
use File::Slurp qw(read_file);
my $lob = read_file 'data.txt', { binmode => ':raw' };

[download]

In Section Seekers of Perl Wisdom