$ perl -Mre=debug -e "/just|another|perl|hacker/"
Compiling REx "just|another|perl|hacker"
~ tying lastbr BRANCH (11) to ender END (15) offset 4
Final program:
   1: TRIEC-EXACT[ahjp] (15)
      <just> 
      <another> 
      <perl> 
      <hacker> 
  15: END (0)
stclass AHOCORASICKC-EXACT[ahjp] minlen 4 
Freeing REx: "just|another|perl|hacker"
$