[...]
open (FILE, ">", $outfileName);
binmode FILE; #set binmode
while (my $row = $sth->fetchrow()) { #fetchrow_arrayref
   
    # Save blob data into this file:
    print FILE $row;
    
}
close FILE;
$sth->finish();
$dbh->disconnect();