my $params = "'196', 'berg',NULL,NULL";
my @list_of_params = map { 
    $_ eq 'NULL' ? undef : $_ 
} map { 
    s/^'(\d+?)'$/$1/m; $_ 
} split /\s*,\s*/, $params ;