in reply to reg exp to find presence of value in a list of comma seperated list
You can try \b word boundary pattern:
print "found\n" if $list =~ m/\bvalue1\b/; [download]
... or use Regexp::Keywords ;-)