Help for this page

Select Code to Download

Select or download this
```
    my $check = m/$mystrings[N]/;
```

Select or download this

#! /usr/bin/perl -w

...
        printf "%s", $b_ok? '.': '@';
    }
}