$s =~ /^$re2$/; #### my $s = 'couldsomeonerecommendaworkingperlmoduletosplitconcatenatedwords'; #### ## $re2 = (recommend|someone|working|module|words|split|comme|could|...