Help for this page

Select Code to Download


  1. or download this
            a => ($b =~ /(\d+)/ ? 0+$1: 0),
  2. or download this
            a => ($b =~ /(\d+)/ ? do{ print $1; $1 }: 0),
  3. or download this
            a => ($b =~ /(\d+)/ ? do{ $1 }: 0),