http://www.perlmonks.org?node_id=910687

gvinu4u has asked for the wisdom of the Perl Monks concerning the following question:

# I want to extract the string from start till "_RVCT22" in the mentioned string, please help me with the same. The below program does not give me any output 
$string = "Viood_ram_shiva_RVCT22";
if ($string =~/(.*?)\"_RVCT"/)
{
print "The file name is $1. ";
}

[download]

Back to Seekers of Perl Wisdom