>perl -wMstrict -le "print pop @{[ 'hello awesome' =~ /(el).*(om)/ ]}; " om #### >perl -wMstrict -le "'hello awesome' =~ /(?el).*(?om)/; print $-{m}[-1]; " om