if ($string =~ m/data/) { 
do whatever
}