my ($args) = @_;
my ( $dbh, $out ) = @$args{qw(dbh out)};
say $dbh->do(
$dbh->do(
q{
UPDATE columns_settings
SET columnname = REGEXP_REPLACE(columnname, '.*holdings_', '')
-