my $RawContent = dbh->quote( $filecontent, VARCHAR ); my $insert_sql = qq( INSERT INTO Received ( RawContent, Filename ) VALUES ( ?, ? ) ); my $insert_sth = $dbh->prepare($insert_sql); my $rv = $insert_sth->execute( $RawContent, $filename );