Help for this page

Select Code to Download

Select or download this

perl -Mre=debug -e '$_ = "foobar#2"; s/#[0-9]+$//'
Compiling REx "#[0-9]+$"
...
   8 <foobar#2> <>           | 16:  END(0)
Match successful!
Freeing REx: "#[0-9]+$"