Help for this page

Select Code to Download

Select or download this

  DB<3> sub bla { "XXX"=~/(X*)/; print "inside $1" }

  DB<4> bla; print "outside $1"
inside XXXoutside
  DB<5>

Select or download this

  DB<5> "YYY"=~/(Y*)/; bla; print "old $1"
inside XXXold YYY
  DB<6>