perl -e 'if(my ($test) = "test" =~ /(es)/){print $test}