Help for this page

Select Code to Download


  1. or download this
    #my $re = qr{(?x: (?<![/-]) \b ( [0-9]{3,4} ) \b (?![/-]) )};
my $re = qr{(?ax: (?<!\d) (\d{3,4}) (?!\d) )};
  2. or download this
    1..10
ok 1 - Testing: 12
...
# 6789
# 0
# Looks like you failed 3 tests of 10.