Help for this page
use re qw(debug); ( "hello Gags" =~ /^(?=hello).*[^G][^a].*$/ )&& print ("Matched") || p +rint ("Unmatched");