Help for this page

Select Code to Download


  1. or download this
    
    printf "\e[102m Count[$num] = %s\e[m\n\n", persist($num, $dbg);
  2. or download this
    
    printf "\e[102m Count[%s] = %s\e[m\n\n", $num, persist($num, $dbg)
+;
  3. or download this
    
    my @dbg = ( );
    map { push @dbg, ($res *= $_) } split(//, $num);
  4. or download this
    
    my @dbg = map { $res *= $_ } split(//, $num);