Help for this page

Select Code to Download

Select or download this

#!/usr/bin/perl
use strict;
...
print 'no match 1',"\n" if not $test_string =~ /$regex/;
print 'no match 2 ',"\n" if ! $test_string =~ /$regex/;
print 'no match 3', "\n" unless $test_string =~ /$regex/;

Select or download this
```
no match 1
no match 3
```