Help for this page

Select Code to Download


  1. or download this
    perl -MRegex::PreSuf -le"print presuf( 51 .. 249 )"
    
  2. or download this
    my $range51to249 = qr!(?:1(?:0[0123456789]|1[0123456789]|2[0123456789]
    +|3[0123456789]|4[0123456789]|5[0123456789]|6[0123456789]|7[0123456789
    +]|8[0123456789]|9[0123456789])|2(?:0[0123456789]|1[0123456789]|2[0123
    +456789]|3[0123456789]|4[0123456789])|5[123456789]|6[0123456789]|7[012
    +3456789]|8[0123456789]|9[0123456789])!;
    
     /^(\d+\.\d+\t$range51to249\.\d+)/