Help for this page

Select Code to Download


  1. or download this
    $s=99;$c='abcdef';for(<>){chomp;$w=$_;$l=y///c;@m=grep{1+index$w,$_}sp
    +lit//,$c;@m>5&&$s>$l||next;$s=$l;$n=$w}print$n
    
  2. or download this
    $s=9;$c='abcdef';for(<>){chop;$w=$_;$l=y///c;(5<grep{1+index$w,$_}spli
    +t//,$c)&&$s>$l||next;$s=$l;$n=$w}print$n
    
  3. or download this
    $s=9;for(<>){chop;$w=$_;$l=y///c;(5<grep{1+index$w,$_}split//,'abcdef'
    +)&&$s>$l||next;$s=$l;$n=$w}print$n
    
  4. or download this
    $s=9;for(<>){chop;$w=$_;$l=y///c;(5<grep{1+index$w,$_}split//,'abcdef'
    +)&&$s>$l&&do{$s=$l;$n=$w}}print$n
    
  5. or download this
    $s=9;for(<>){$w=$_;$l=y///c;(6<grep{1+index$w,$_}split//,"abcdef\n")&&
    +$s>=$l&&do{$s=$l;$n=$w}}print$n