Help for this page

Select Code to Download


  1. or download this
    sub mc_sym {
      \%{{map{(reverse eq$_&&($x=$_*$_)eq reverse$x)?($_,$x):()}1..pop}}
    }
    
  2. or download this
    sub mc_sym {
      +{map{(reverse==$_&&($x=$_*$_)==reverse$x)?($_,$x):()}1..pop}
    }
    
  3. or download this
    sub mc_sym {
      +{map{(reverse^$_||($x=$_*$_)^reverse$x)?():($_,$x)}1..pop}
    }