$foo = "abchelloxyz";
$foo =~ /abc([\w]+)xyz/;
$bar = $1;