@matches = "hello awesome" =~ /(el).*(om)/;
print pop @awesome;

##</code><code>##

$ perl -we 'print pop ("hello awesome" =~ /(el).*(om)/);'
Type of arg 1 to pop must be array (not pattern match (m//)) at -e line 1, near "/(el).*(om)/)"
Execution of -e aborted due to compilation errors.

##</code><code>##

$ perl -we 'print pop (@matches = "hello awesome" =~ /(el).*(om)/);'
Type of arg 1 to pop must be array (not list assignment) at -e line 1, near "/(el).*(om)/)"
Execution of -e aborted due to compilation errors.

##</code><code>##

$ perl -we 'print ${["hello awesome" =~ /(el).*(om)/]}[1];'
om