$string = "Viood_ram_shiva_RVCT22";
if ($string =~/(\w+)(_RVCT)/)
{
print "The file name is $1. ";
}