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