$param =~ s/'(\d+)'/$1/g; @list_of_params = map { ($_ eq 'NULL') ? undef : $_ } split( /\s*,\s*/, $param );