$_ = 'hello_world:foo_bar:goodbye_world';
/\w+:(\w+):\w+/;
print $1;